r29560 - /trunk/dh-make-perl/lib/DhMakePerl/Config.pm
dmn at users.alioth.debian.org
dmn at users.alioth.debian.org
Sun Jan 11 15:05:36 UTC 2009
Author: dmn
Date: Sun Jan 11 15:05:33 2009
New Revision: 29560
URL: http://svn.debian.org/wsvn/pkg-perl/?sc=1&rev=29560
Log:
Config: fix populating options from config file
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=29560&op=diff
==============================================================================
--- trunk/dh-make-perl/lib/DhMakePerl/Config.pm (original)
+++ trunk/dh-make-perl/lib/DhMakePerl/Config.pm Sun Jan 11 15:05:33 2009
@@ -161,14 +161,15 @@
if $yaml->{'config-file'};
for ( $self->options ) {
- ( my $key = $_ ) =~ s/_/-/g;
+ ( my $key = $_ ) =~ s/[!=|].*//;
next unless exists $yaml->{$key};
next
if $self->_explicitly_set
->{$key}; # cmd-line opts take precedence
- $self->$_( delete $yaml->{$key} );
+ ( my $opt = $key ) =~ s/-/_/g;
+ $self->$opt( delete $yaml->{$key} );
}
die "Error parsing $fn: the following keys are not known:\n"
More information about the Pkg-perl-cvs-commits
mailing list