l10n_getname.pl revision 10143
5214N/Aour $opt_specdir;
5214N/Amy @specs_to_build = ();
5214N/Amy $build_command;
5214N/Asub process_defaults () {
5214N/Asub process_args {
5214N/A if (not defined ($build_command)) {
5214N/Asub process_options {
5214N/A 'get-sources-from-child=s' => sub { shift; $defaults->set ('get_source_names_from_child', shift); },
5214N/A 'get-patches-from-child=s' => sub { shift; $defaults->set ('get_patch_names_from_child', shift); },
5214N/A 'get-builddir-from-child=s' => sub { shift; $defaults->set ('get_builddir_name_from_child', shift); },
5214N/Asub print_self_name ($) {
5214N/Asub print_child_names ($) {
5214N/Asub print_sources ($) {
5214N/Asub print_sources_from_child ($$) {
5214N/Asub print_patches ($) {
5214N/Asub print_patches_from_child ($$) {
5214N/Asub print_builddir ($) {
5214N/Asub print_child_builddirs ($) {
5214N/Asub print_builddir_from_child ($$) {
5214N/Asub get_parse_options ($) {
5214N/A my $user_rpm_name;
5214N/A get_parse_options ($i);