Lines Matching refs:defaults

99 my $defaults;
102 $defaults = config->new();
103 $defaults->add ('get_name', 'n',
106 $defaults->add ('get_child_names', 'n',
109 $defaults->add ('get_source_names', 'n',
112 $defaults->add ('get_source_names_from_child', 's',
115 $defaults->add ('get_patch_names', 'n',
118 $defaults->add ('get_patch_names_from_child', 's',
121 $defaults->add ('get_builddir_name', 'n',
124 $defaults->add ('get_child_builddir_names', 'n',
127 $defaults->add ('get_builddir_name_from_child', 's',
169 'get-name' => sub { $defaults->set ('get_name', 1); },
170 'get-child-names' => sub { $defaults->set ('get_child_names', 1); },
171 'get-sources' => sub { $defaults->set ('get_source_names', 1); },
172 'get-sources-from-child=s' => sub { shift; $defaults->set ('get_source_names_from_child', shift); },
173 'get-patches' => sub { $defaults->set ('get_patch_names', 1); },
174 'get-patches-from-child=s' => sub { shift; $defaults->set ('get_patch_names_from_child', shift); },
175 'get-builddir' => sub { $defaults->set ('get_builddir_name', 1); },
176 'get-child-builddirs' => sub { $defaults->set ('get_child_builddir_names', 1); },
177 'get-builddir-from-child=s' => sub { shift; $defaults->set ('get_builddir_name_from_child', shift); },
459 if ($defaults->get ('get_name')) {
464 if ($defaults->get ('get_child_names')) {
469 if ($defaults->get ('get_source_names')) {
474 $user_rpm_name = $defaults->get ('get_source_names_from_child');
480 if ($defaults->get ('get_patch_names')) {
485 $user_rpm_name = $defaults->get ('get_patch_names_from_child');
491 if ($defaults->get ('get_builddir_name')) {
496 if ($defaults->get ('get_child_builddir_names')) {
501 $user_rpm_name = $defaults->get ('get_builddir_name_from_child');