Reviewed-by: Bernhard Bitsch bbitsch@ipfire.org
Am 01.08.2023 um 17:48 schrieb Stefan Schantl:
Signed-off-by: Stefan Schantl stefan.schantl@ipfire.org
html/cgi-bin/extrahd.cgi | 12 ++++++++++++ 1 file changed, 12 insertions(+)
diff --git a/html/cgi-bin/extrahd.cgi b/html/cgi-bin/extrahd.cgi index bb0c22610..4db540aae 100644 --- a/html/cgi-bin/extrahd.cgi +++ b/html/cgi-bin/extrahd.cgi @@ -690,3 +690,15 @@ sub is_swap ($) {
return 1 if(grep /$device/, @swaps); }
+# +## Returns "True" if a drive is a configured one. +# +sub is_configured ($) {
- my ($path) = @_;
- # Loop through the hash of configured drives.
- foreach my $uuid (keys %configured_drives) {
return 1 if($configured_drives{$uuid} eq "$path");
- }
+}