From c7fafb82ab15169f25be0e9543e71861b48c4062 Mon Sep 17 00:00:00 2001 From: Mark Buechler Date: Thu, 18 Dec 2008 16:05:55 +0000 Subject: [PATCH] - Fixed enabling/disabling targets. Spotted by Witold Kowolik. git-svn-id: http://svn.code.sf.net/p/scst/svn/trunk@619 d57e44dd-8a1f-0410-8b47-8ef2f437770f --- scstadmin/scstadmin | 4 +++- 1 file changed, 3 insertions(+), 1 deletion(-) diff --git a/scstadmin/scstadmin b/scstadmin/scstadmin index ee943ae73..1d85523e3 100755 --- a/scstadmin/scstadmin +++ b/scstadmin/scstadmin @@ -1415,6 +1415,8 @@ sub enableTarget { my $target = shift; my $enable = shift; + $target = unformatTarget($target); + return undef if (!defined($$TARGETS{$target})); my $io = new IO::File $$TARGETS{$target}->{'path'}, O_WRONLY; @@ -1435,7 +1437,7 @@ sub enableTarget { close $io; - $$TARGETS{unformatTarget($target)}->{'enabled'} = $enable; + $$TARGETS{$target}->{'enabled'} = $enable; return $FALSE; }