Code clean up

Signed-off-by: Michael Rasmussen <mir@datanom.net>
This commit is contained in:
Michael Rasmussen
2013-10-20 13:20:34 +02:00
committed by Dietmar Maurer
parent b1045cc2ca
commit 099925e4ba

View File

@ -221,7 +221,6 @@ my $init_lu_name = sub {
my $free_lu_name = sub {
my ($target, $lu_name) = @_;
my $used = ();
$lu_name =~ /^LUN(\d+)$/;
$SETTINGS->{$target}->{used}->{$1} = 0;
@ -288,7 +287,7 @@ my $parser = sub {
die "$scfg->{target}: Target not found" unless $SETTINGS->{targets};
my $max = $SETTINGS->{targets};
my $base = get_base;
my $n;
for (my $i = 1; $i <= $max; $i++) {
my $target = $SETTINGS->{nodebase}.':'.$SETTINGS->{"LogicalUnit$i"}->{TargetName};
if ($target eq $scfg->{target}) {