From 603aa7bb43011fa991c0a15a2683696ee9fc7ca7 Mon Sep 17 00:00:00 2001 From: justme-1968 Date: Wed, 29 May 2019 15:51:29 +0000 Subject: [PATCH] 31_HUEDevice.pm: add scene id in dropdown if multiple scenes with the same name exist git-svn-id: https://svn.fhem.de/fhem/trunk@19484 2b470e98-0d58-463d-a4d8-8e2adae1ed80 --- fhem/FHEM/31_HUEDevice.pm | 13 ++++++++++++- 1 file changed, 12 insertions(+), 1 deletion(-) diff --git a/fhem/FHEM/31_HUEDevice.pm b/fhem/FHEM/31_HUEDevice.pm index de6605a7d..d429bc827 100644 --- a/fhem/FHEM/31_HUEDevice.pm +++ b/fhem/FHEM/31_HUEDevice.pm @@ -869,7 +869,18 @@ HUEDevice_Set($@) } return 0; }; - $list .= " scene:". join(",", sort grep { defined } map { if( !containsOneOfMyLights($scenes->{$_}{lights}) ) { undef; } else { my $scene = $scenes->{$_}{name}; $scene =~ s/ /#/g; $scene} } keys %{$scenes} ); + my %count; + map { $count{$scenes->{$_}{name}}++ } keys %{$scenes}; + $list .= " scene:". join(",", sort grep { defined } map { if( !containsOneOfMyLights($scenes->{$_}{lights}) ) { + undef; + } else { + my $scene = $scenes->{$_}{name}; + if( $count{$scene} > 1 ) { + $scene .= " [id=$_]"; + } + $scene =~ s/ /#/g; $scene; + } + } keys %{$scenes} ); } else { $list .= " scene"; }