r50046 - /trunk/dh-make-perl/lib/DhMakePerl.pm

carnil-guest at users.alioth.debian.org carnil-guest at users.alioth.debian.org
Sun Jan 3 09:54:14 UTC 2010


Author: carnil-guest
Date: Sun Jan  3 09:54:10 2010
New Revision: 50046

URL: http://svn.debian.org/wsvn/pkg-perl/?sc=1&rev=50046
Log:
some further alignment changes for DhMakePerl.pm

Modified:
    trunk/dh-make-perl/lib/DhMakePerl.pm

Modified: trunk/dh-make-perl/lib/DhMakePerl.pm
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/dh-make-perl/lib/DhMakePerl.pm?rev=50046&op=diff
==============================================================================
--- trunk/dh-make-perl/lib/DhMakePerl.pm (original)
+++ trunk/dh-make-perl/lib/DhMakePerl.pm Sun Jan  3 09:54:10 2010
@@ -195,13 +195,14 @@
         print "Engaging refresh mode\n" if $self->cfg->verbose;
         $self->main_dir('.');
 
-        die $self->debian_file('rules.bak')." already exists. Aborting!\n"
+        die $self->debian_file('rules.bak') . " already exists. Aborting!\n"
             if -e $self->debian_file('rules.bak');
 
-        die $self->debian_file('copyright.bak')." already exists. Aborting!\n"
+        die $self->debian_file('copyright.bak')
+            . " already exists. Aborting!\n"
             if -e $self->debian_file('copyright.bak');
 
-        die $self->debian_file('control.bak')." already exists. Aborting!\n"
+        die $self->debian_file('control.bak') . " already exists. Aborting!\n"
             if -e $self->debian_file('control.bak');
 
         $self->process_meta;
@@ -445,11 +446,11 @@
     unshift( @{ $CPAN::Config->{'urllist'} }, $self->cfg->cpan_mirror )
         if $self->cfg->cpan_mirror;
 
-    $CPAN::Config->{'build_dir'} = $ENV{'HOME'} . "/.cpan/build";
-    $CPAN::Config->{'cpan_home'} = $ENV{'HOME'} . "/.cpan/";
-    $CPAN::Config->{'histfile'}  = $ENV{'HOME'} . "/.cpan/history";
+    $CPAN::Config->{'build_dir'}         = $ENV{'HOME'} . "/.cpan/build";
+    $CPAN::Config->{'cpan_home'}         = $ENV{'HOME'} . "/.cpan/";
+    $CPAN::Config->{'histfile'}          = $ENV{'HOME'} . "/.cpan/history";
     $CPAN::Config->{'keep_source_where'} = $ENV{'HOME'} . "/.cpan/source";
-    $CPAN::Config->{'tar_verbosity'} = $self->cfg->verbose ? 'v' : '';
+    $CPAN::Config->{'tar_verbosity'}     = $self->cfg->verbose ? 'v' : '';
     $CPAN::Config->{'load_module_verbosity'}
         = $self->cfg->verbose ? 'verbose' : 'silent';
 }




More information about the Pkg-perl-cvs-commits mailing list