From 0d117a624f5ad3f59795bbd8d9802b270df8b466 Mon Sep 17 00:00:00 2001
From: J Pipkin <j@dawnrazor.net>
Date: Sun, 9 Sep 2012 00:09:44 -0500
Subject: fixes for correction of hash usage in GetOptions

---
 sboconfig | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

(limited to 'sboconfig')

diff --git a/sboconfig b/sboconfig
index d84b482..70120e4 100755
--- 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";
-- 
cgit v1.2.3