X-Git-Url: http://mj.ucw.cz/gitweb/?a=blobdiff_plain;f=lib%2Fperl%2FConfigure.pm;h=383639f9ea3fd1ffb61e47208b4b1184852a193a;hb=1d8112cb590e458baa899805908a8ac910f58163;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);