r50138 - /trunk/dh-make-perl/lib/DhMakePerl/Config.pm

[dmn at users.alioth.debian.org]

Author: dmn
Date: Mon Jan  4 12:33:26 2010
New Revision: 50138

URL: http://svn.debian.org/wsvn/pkg-perl/?sc=1&rev=50138
Log:
override default --only only if --only is given

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

Modified: trunk/dh-make-perl/lib/DhMakePerl/Config.pm
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/dh-make-perl/lib/DhMakePerl/Config.pm?rev=50138&op=diff
==============================================================================
--- trunk/dh-make-perl/lib/DhMakePerl/Config.pm (original)
+++ trunk/dh-make-perl/lib/DhMakePerl/Config.pm Mon Jan  4 12:33:26 2010
@@ -129,7 +129,8 @@
                                                                        # back to defaults
 
     # handle comma-separated multiple values in --only
-    $opts{only} = [ split( /,/, join( ',', @{ $opts{only} || [] } ) ) ];
+    $opts{only} = [ split( /,/, join( ',', @{ $opts{only} } ) ) ]
+        if exists $opts{only};
 
     while ( my ( $k, $v ) = each %opts ) {
         my $field = $k;