[Date Prev][Date Next] [Thread Prev][Thread Next] [Date Index] [Thread Index]

[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: