diff --git a/fhem/FHEM/01_FHEMWEB.pm b/fhem/FHEM/01_FHEMWEB.pm
index 29fa16b2e..af529bdfa 100755
--- a/fhem/FHEM/01_FHEMWEB.pm
+++ b/fhem/FHEM/01_FHEMWEB.pm
@@ -1025,8 +1025,8 @@ FW_detailSelect(@)
 {
   my ($d, $cmd, $list, $param) = @_;
   return if(!$list || $FW_hiddenroom{input});
-  my @al = map { s/:.*//;$_ } split(" ", $list);
-  @al = sort keys { map { $_ => 1 } @al }; # remove duplicate items in list
+  my %al = map { s/:.*//;$_ => 1 } split(" ", $list);
+  my @al = sort keys %al; # remove duplicate items in list
 
   my $selEl = (defined($al[0]) ? $al[0] : " ");
   $selEl = $1 if($list =~ m/([^ ]*):slider,/); # promote a slider if available