FHEM/fhem-mirror
2
0
Fork 0
mirror of https://github.com/fhem/fhem-mirror.git synced 2025-03-03 16:56:54 +00:00
Code Issues Releases Wiki Activity

updated selection of add-device-list: suppress CUL$ only (instead of CUL.*)

Browse Source 
git-svn-id: https://svn.fhem.de/fhem/trunk@1334 2b470e98-0d58-463d-a4d8-8e2adae1ed80
This commit is contained in:
ulimaass 2012-03-12 14:24:30 +00:00
parent b89825ae41
commit fc74bd6a23
1 changed files with 2 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

3
fhem/contrib/95_FLOORPLAN/95_FLOORPLAN.pm
View File

@ -13,6 +13,7 @@
# 0006: kicked out various routines previously copied from FHEMWEB - now using FW_*-versions thanks to addtl. global variables $FW_RET, $FW_wname, $FW_subdir, %FW_pos # 0006: kicked out various routines previously copied from FHEMWEB - now using FW_*-versions thanks to addtl. global variables $FW_RET, $FW_wname, $FW_subdir, %FW_pos
# 0007: Added fp_default # 0007: Added fp_default
# 0008: Changed name of background-picture from <floorplan-name> to fp_<floorplan-name> to avoid display of picture in device-list at fhem-menu 'Everything' # 0008: Changed name of background-picture from <floorplan-name> to fp_<floorplan-name> to avoid display of picture in device-list at fhem-menu 'Everything'
# 0009: updated selection of add-device-list: suppress CUL$ only (instead of CUL.*)
# #
################################################################ ################################################################
# #
@ -480,7 +481,7 @@ FP_menuArrange() {
foreach my $d (@devs) { # loop all devices foreach my $d (@devs) { # loop all devices
my $type = $defs{$d}{TYPE}; my $type = $defs{$d}{TYPE};
# exclude these types from list of available devices # exclude these types from list of available devices
next if($type =~ m/(WEB|CUL.*|FHEM.*|FileLog|PachLog|PID|SUNRISE.*|FLOORPLAN|holiday|Global|notify)/ ); next if($type =~ m/(WEB|CUL$|FHEM.*|FileLog|PachLog|PID|SUNRISE.*|FLOORPLAN|holiday|Global|notify)/ );
my $av = AttrVal("$d","fp_$FP_name", undef); my $av = AttrVal("$d","fp_$FP_name", undef);
push(@fpl, $d) if ($av); push(@fpl, $d) if ($av);
push(@nfpl, $d) if (!$av); push(@nfpl, $d) if (!$av);