r27253 - /trunk/dh-make-perl/dh-make-perl
dmn at users.alioth.debian.org
dmn at users.alioth.debian.org
Tue Nov 25 08:38:44 UTC 2008
Author: dmn
Date: Tue Nov 25 08:38:42 2008
New Revision: 27253
URL: http://svn.debian.org/wsvn/pkg-perl/?sc=1&rev=27253
Log:
Simple patch to avoid doing work if we're being required and not run.
Modified:
trunk/dh-make-perl/dh-make-perl
Modified: trunk/dh-make-perl/dh-make-perl
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/dh-make-perl/dh-make-perl?rev=27253&op=diff
==============================================================================
--- trunk/dh-make-perl/dh-make-perl (original)
+++ trunk/dh-make-perl/dh-make-perl Tue Nov 25 08:38:42 2008
@@ -117,6 +117,11 @@
$startdir = getcwd();
$datadir = '/usr/share/dh-make-perl';
$homedir = "$ENV{HOME}/.dh-make-perl";
+
+# If we're being required rather than called as a main command, then
+# return now without doing any work. This facilitates easier testing.
+
+return 1 if $0 ne __FILE__;
my ( $perlname, $maindir, $modulepm, $meta );
my ($pkgname, $srcname,
More information about the Pkg-perl-cvs-commits
mailing list