sbotools2

commit 0d117a624f5ad3f59795bbd8d9802b270df8b466
parent 06c3247f55cf5ec1d1c8cd9b67a4852344a86eb6
Author: J Pipkin <j@dawnrazor.net>
Date:   Sun,  9 Sep 2012 00:09:44 -0500

fixes for correction of hash usage in GetOptions

Diffstat:
M
sboconfig
 | 
4
++--

1 file changed, 2 insertions(+), 2 deletions(-)
diff --git a/sboconfig b/sboconfig
@@ -63,7 +63,7 @@ my %valid_confs = (
 
 my %params = reverse %valid_confs;
 
-if ($list) {
+if (exists $options{list}) {
 	my @keys = sort {$a cmp $b} keys %config;
 	say "sboconfig -$params{$_}:\n    $_=$config{$_}" for @keys;
 	exit 0;
@@ -74,7 +74,7 @@ show_usage and exit 0 unless keys %options > 0;
 # setup what's being changed, sanity check.
 my %changes;
 while (my ($key, $value) = each %valid_confs) {
-	$changes{$value} = $settings{$key} if exists $settings{$key};
+	$changes{$value} = $options{$key} if exists $options{$key};
 }
 
 my $die = "You have provided an invalid parameter for";