diff options
author | Joey Hess <joey@gnu.kitenet.net> | 2009-06-29 15:35:18 -0400 |
---|---|---|
committer | Joey Hess <joey@gnu.kitenet.net> | 2009-06-29 15:35:18 -0400 |
commit | fe3bf5cfa5e99cec28e0289508faaf9e68efec25 (patch) | |
tree | 6960790853004a956fb2dfa94925c1a498139d67 /Debian/Debhelper/Dh_Buildsystems.pm | |
parent | d6661136b167b05bb55afab08e8ee53e919a89c1 (diff) |
misc minor changes
Diffstat (limited to 'Debian/Debhelper/Dh_Buildsystems.pm')
-rw-r--r-- | Debian/Debhelper/Dh_Buildsystems.pm | 7 |
1 files changed, 3 insertions, 4 deletions
diff --git a/Debian/Debhelper/Dh_Buildsystems.pm b/Debian/Debhelper/Dh_Buildsystems.pm index d37c593d..64ec18a4 100644 --- a/Debian/Debhelper/Dh_Buildsystems.pm +++ b/Debian/Debhelper/Dh_Buildsystems.pm @@ -87,7 +87,7 @@ sub load_all_buildsystems { } } - # Push standard debhelper build systems first + # Standard debhelper build systems first for my $name (@BUILDSYSTEMS) { error("standard debhelper build system '$name' could not be found/loaded") if not exists $buildsystems{$name}; @@ -131,8 +131,7 @@ sub buildsystems_list { # List build systems (including auto and specified status) my ($auto, $specified); - my @buildsystems = load_all_buildsystems(); - for my $inst (@buildsystems) { + for my $inst (load_all_buildsystems()) { my $is_specified = defined $opt_buildsys && $opt_buildsys eq $inst->NAME(); if (! defined $specified && defined $opt_buildsys && $opt_buildsys eq $inst->NAME()) { $specified = $inst->NAME(); @@ -177,4 +176,4 @@ sub buildsystems_do { return 0; } -1; +1 |