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

[dmn at users.alioth.debian.org]

Author: dmn
Date: Mon Jan  4 12:29:06 2010
New Revision: 50136

URL: http://svn.debian.org/wsvn/pkg-perl/?sc=1&rev=50136
Log:
Config: do not crash when no --only was 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=50136&op=diff
==============================================================================
--- trunk/dh-make-perl/lib/DhMakePerl/Config.pm (original)
+++ trunk/dh-make-perl/lib/DhMakePerl/Config.pm Mon Jan  4 12:29:06 2010
@@ -129,7 +129,7 @@
                                                                        # back to defaults
 
     # handle comma-separated multiple values in --only
-    $opts{only} = [ split( /,/, join( ',', @{ $opts{only} } ) ) ];
+    $opts{only} = [ split( /,/, join( ',', @{ $opts{only} || [] } ) ) ];
 
     while ( my ( $k, $v ) = each %opts ) {
         my $field = $k;