scstadmin: Fix precedence typo in error propagation

Fix Perl precedence warnings:

  Possible precedence problem between ! and numeric gt (>) at SCST.pm line 980.
  Possible precedence problem between ! and numeric gt (>) at SCST.pm line 1223.
  Possible precedence problem between ! and numeric gt (>) at SCST.pm line 3847.
This commit is contained in:
Gleb Chesnokov
2025-11-05 11:32:43 +03:00
parent 492b6ccbea
commit 2df209ea5f

View File

@@ -977,7 +977,7 @@ sub checkDriverDynamicAttributes {
if (!defined($available)) {
my $rc = $self->driverExists($driver);
return SCST_C_DRV_NO_DRIVER if (!$rc);
return $rc if (!$rc > 1);
return $rc if ($rc > 1);
return SCST_C_FATAL_ERROR;
}
@@ -1220,7 +1220,7 @@ sub checkTargetDynamicAttributes {
if (!defined($available)) {
my $rc = $self->driverExists($driver);
return SCST_C_DRV_NO_DRIVER if (!$rc);
return $rc if (!$rc > 1);
return $rc if ($rc > 1);
return SCST_C_FATAL_ERROR;
}
@@ -3844,7 +3844,7 @@ sub checkDeviceCreateAttributes {
if (!defined($available)) {
my $rc = $self->handlerExists($handler);
return SCST_C_HND_NO_HANDLER if (!$rc);
return $rc if (!$rc > 1);
return $rc if ($rc > 1);
return SCST_C_FATAL_ERROR;
}