misc minor changes

8 files changed, 15 insertions, 16 deletions

diff --git a/Debian/Debhelper/Buildsystem.pm b/Debian/Debhelper/Buildsystem.pm
index 3ee37a5f..c63f8153 100644
--- a/Debian/Debhelper/Buildsystem.pm
+++ b/Debian/Debhelper/Buildsystem.pm
@@ -91,16 +91,16 @@ sub _set_builddir {
 	}
 }
 
-# This instance method is called to check if the build system is capable
+# This instance method is called to check if the build system is able
 # to auto build a source package. Additional argument $step describes
 # which operation the caller is going to perform (either configure,
 # build, test, install or clean). You must override this method for the
 # build system module to be ever picked up automatically. This method is
 # used in conjuction with @Dh_Buildsystems::BUILDSYSTEMS.
 #
-# This method is supposed to be called with source root directory being
-# working directory. Use $this->get_buildpath($path) method to get full
-# path to the files in the build directory.
+# This method is supposed to be called inside the source root directory.
+# Use $this->get_buildpath($path) method to get full path to the files
+# in the build directory.
 sub check_auto_buildable {
 	my $this=shift;
 	my ($step) = @_;
@@ -257,7 +257,7 @@ sub _cd {
 	}
 }
 
-# Changes working directory to the source directory (if needed)
+# Changes working directory to the source directory (if needed),
 # calls doit(@_) and changes working directory back to the top
 # directory.
 sub doit_in_sourcedir {
@@ -374,4 +374,4 @@ sub clean {
 	my $this=shift;
 }
 
-1;
+1
diff --git a/Debian/Debhelper/Buildsystem/autoconf.pm b/Debian/Debhelper/Buildsystem/autoconf.pm
index 60fa9e85..7229fc71 100644
--- a/Debian/Debhelper/Buildsystem/autoconf.pm
+++ b/Debian/Debhelper/Buildsystem/autoconf.pm
@@ -52,4 +52,4 @@ sub configure {
 	$this->doit_in_builddir($this->get_source_rel2builddir("configure"), @opts, @_);
 }
 
-1;
+1
diff --git a/Debian/Debhelper/Buildsystem/cmake.pm b/Debian/Debhelper/Buildsystem/cmake.pm
index 56628740..fe97f772 100644
--- a/Debian/Debhelper/Buildsystem/cmake.pm
+++ b/Debian/Debhelper/Buildsystem/cmake.pm
@@ -42,4 +42,4 @@ sub configure {
 	$this->doit_in_builddir("cmake", $this->get_source_rel2builddir(), @flags);
 }
 
-1;
+1
diff --git a/Debian/Debhelper/Buildsystem/makefile.pm b/Debian/Debhelper/Buildsystem/makefile.pm
index d84d3349..3809d594 100644
--- a/Debian/Debhelper/Buildsystem/makefile.pm
+++ b/Debian/Debhelper/Buildsystem/makefile.pm
@@ -92,4 +92,4 @@ sub clean {
 	}
 }
 
-1;
+1
diff --git a/Debian/Debhelper/Buildsystem/perl_build.pm b/Debian/Debhelper/Buildsystem/perl_build.pm
index 3567cb1a..caba9b75 100644
--- a/Debian/Debhelper/Buildsystem/perl_build.pm
+++ b/Debian/Debhelper/Buildsystem/perl_build.pm
@@ -64,4 +64,4 @@ sub clean {
 	$this->do_perl("Build", "--allow_mb_mismatch", 1, "distclean", @_);
 }
 
-1;
+1
diff --git a/Debian/Debhelper/Buildsystem/perl_makemaker.pm b/Debian/Debhelper/Buildsystem/perl_makemaker.pm
index 07a827ac..702458c5 100644
--- a/Debian/Debhelper/Buildsystem/perl_makemaker.pm
+++ b/Debian/Debhelper/Buildsystem/perl_makemaker.pm
@@ -61,4 +61,4 @@ sub install {
 	$this->SUPER::install($destdir, "PREFIX=/usr", @_);
 }
 
-1;
+1
diff --git a/Debian/Debhelper/Buildsystem/python_distutils.pm b/Debian/Debhelper/Buildsystem/python_distutils.pm
index 39a4466a..fce45135 100644
--- a/Debian/Debhelper/Buildsystem/python_distutils.pm
+++ b/Debian/Debhelper/Buildsystem/python_distutils.pm
@@ -111,4 +111,4 @@ sub clean {
 	$this->doit_in_sourcedir('find', '.', '-name', '*.pyc', '-exec', 'rm', '{}', ';');
 }
 
-1;
+1
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