r17952 - /trunk/dh-make-perl/dh-make-perl

[dmn at users.alioth.debian.org]

Author: dmn
Date: Mon Mar 24 14:15:27 2008
New Revision: 17952

URL: http://svn.debian.org/wsvn/pkg-perl/?sc=1&rev=17952
Log:
--refresh doesn't need to be negatable, unite with -R (thanks to sgran)

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=17952&op=diff
==============================================================================
--- trunk/dh-make-perl/dh-make-perl (original)
+++ trunk/dh-make-perl/dh-make-perl Mon Mar 24 14:15:27 2008
@@ -135,7 +135,7 @@
 	   'cpan-mirror=s', 'dbflags=s', 'depends=s', 'desc=s',
 	   'exclude|i:s{,}', 'help', 'install!', 'nometa', 'notest',
 	   'pkg-perl!', 'requiredeps', 'version=s', 'e=s', 'email=s',
-	   'p=s', 'packagename=s', 'refresh!', 'R!',
+	   'p=s', 'packagename=s', 'refresh|R',
 ) or die usage_instructions();
 
 @stdmodules = get_stdmodules();
@@ -147,7 +147,7 @@
 $opts{exclude} = '(?:\/|^)(?:CVS|.svn)\/' if (!defined $opts{exclude} or
 					  $opts{exclude} eq '');
 
-if ( $opts{R} or $opts{refresh} )
+if ( $opts{refresh} )
 {
     print "Engaging refresh mode\n";
     $maindir='.';