From b8c32607eb188fcba6e440d0cf1c1afb2953e2c3 Mon Sep 17 00:00:00 2001 From: Jacob Pipkin Date: Fri, 1 Jun 2012 15:28:20 -0500 Subject: fix bug where -c arg to sboupgrade did nothing --- sboupgrade | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/sboupgrade b/sboupgrade index cbe7c50..fecf53b 100755 --- a/sboupgrade +++ b/sboupgrade @@ -45,7 +45,7 @@ getopts ('hvacdfj:NriopR', \%options); show_usage () && exit (0) if exists $options{h}; show_version () && exit (0) if exists $options{v}; -my $noclean = exists $options{c} ? 'FALSE' : $config{NOCLEAN}; +my $noclean = exists $options{c} ? 'TRUE' : $config{NOCLEAN}; my $distclean = exists $options{d} ? 'TRUE' : $config{DISTCLEAN}; my $force = exists $options{f} ? 'TRUE' : 'FALSE'; my $install_new = exists $options{N} ? 'TRUE' : 'FALSE'; @@ -205,7 +205,7 @@ sub readme_prompt { my $opts = grok_options ($readme); print "\n". $readme if $opts eq "7"; close $readme_file; - $name = $compat32 eq 'TRUE' ? "$sbo-compat32" : $sbo; + my $name = $compat32 eq 'TRUE' ? "$sbo-compat32" : $sbo; print "\nProceed with $name? [y]: "; my $test = ; $test = 'y' if $test eq "\n"; -- cgit v1.2.3