[SCM] Debian package checker branch, master, updated. 2.5.1-84-geb1c186
The following commit has been merged in the master branch:
commit 46ec8273aeb063bdf8ac6b2bf149d86e24373a75
Author: Niels Thykier <niels@thykier.net>
Date: Tue Jul 12 13:51:21 2011 +0200
Reduced the scope of some code and the Cwd usage
diff --git a/frontend/lintian b/frontend/lintian
index c1a3885..dcc1790 100755
--- a/frontend/lintian
+++ b/frontend/lintian
@@ -26,7 +26,6 @@ use strict;
use warnings;
use Getopt::Long;
-use Cwd;
# }}}
@@ -485,13 +484,12 @@ Getopt::Long::config('bundling', 'no_getopt_compat', 'no_auto_abbrev');
GetOptions(%opthash)
or die("error parsing options\n");
-# determine current working directory--we'll need this later
-$cwd = Cwd::getcwd();
-
# determine LINTIAN_ROOT if it was not set with --root.
$LINTIAN_ROOT = $ENV{'LINTIAN_ROOT'} unless (defined($LINTIAN_ROOT));
if (defined $LINTIAN_ROOT) {
unless ($LINTIAN_ROOT =~ m,^/,) {
+ require Cwd;
+ my $cwd = Cwd::getcwd();
$LINTIAN_ROOT = "$cwd/$LINTIAN_ROOT";
}
} else {
@@ -1668,6 +1666,7 @@ sub interrupted {
$SIG{$_[0]} = 'DEFAULT';
die "N: Interrupted.\n";
}
+
# }}}
# Local Variables:
--
Debian package checker
Reply to: