X-Git-Url: http://mj.ucw.cz/gitweb/?a=blobdiff_plain;ds=sidebyside;f=lib%2Fperl%2FConfigure.pm;h=383639f9ea3fd1ffb61e47208b4b1184852a193a;hb=d1a5b69d490ce61a0f41db08263580487720bf2f;hp=b16d15a88f3a04a4978072e4e063835bfdb9a0fe;hpb=170bd8c4f65e0d5dab61638af5d5db1ece15c9d0;p=libucw.git diff --git a/lib/perl/Configure.pm b/lib/perl/Configure.pm index b16d15a8..383639f9 100644 --- a/lib/perl/Configure.pm +++ b/lib/perl/Configure.pm @@ -119,7 +119,7 @@ sub Init($$) { if ($x =~ /^(\w+)=(.*)/) { Override($1 => $2); } elsif ($x =~ /^-(\w+)$/) { - Override($1 => 1); + Override($1 => 0); delete $vars{$1}; } elsif ($x =~ /^(\w+)$/) { Override($1 => 1);