diff --git a/scstadmin/scstadmin.sysfs/scstadmin b/scstadmin/scstadmin.sysfs/scstadmin index 0e3536a77..4bb89e66e 100755 --- a/scstadmin/scstadmin.sysfs/scstadmin +++ b/scstadmin/scstadmin.sysfs/scstadmin @@ -1895,7 +1895,7 @@ sub listDevice { sub listDrivers { my $driver = shift; - return listTargets(undef, $driver) if ($driver); + return listTargets($driver, undef) if ($driver); my $drivers = $SCST->drivers(); @@ -1917,8 +1917,8 @@ sub listDrivers { } sub listTargets { - my $target = shift; my $driver = shift; + my $target = shift; my %toprint; return listGroups(undef, $driver, $target) if ($target && $driver);