Public/fhem-mirror
1
0
Fork 0
mirror of https://github.com/fhem/fhem-mirror.git synced 2025-05-04 22:19:38 +00:00
Code Issues Packages Projects Releases Wiki Activity

01_FHEMWEB.pm: add show command by justme1968 (Forum #86862)

Browse Source 
git-svn-id: https://svn.fhem.de/fhem/trunk/fhem@18577 2b470e98-0d58-463d-a4d8-8e2adae1ed80
This commit is contained in:
rudolfkoenig 2019-02-13 07:06:12 +00:00
parent fce518a934
commit 2d5e7bb3bf
1 changed files with 25 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

27
FHEM/01_FHEMWEB.pm
View File

@ -257,6 +257,12 @@ FHEMWEB_Initialize($)
$FW_use{$mod} = 1;
}
}
$cmds{show} = {
Fn=>"FW_show", ClientFilter=>"FHEMWEB",
Hlp=>"<devspec>, show temporary room with devices from <devspec>"
};
}
#####################################
@ -1862,8 +1868,16 @@ FW_showRoom()
# array of all device names in the room (exception weblinks without group
# attribute)
my @devs= grep { (($FW_rooms{$FW_room} && $FW_rooms{$FW_room}{$_}) ||
$FW_room eq "all") && !IsIgnored($_) } keys %defs;
my @devs;
if( $FW_room =~ m/^#devspec=(.*)$/ ) {
@devs = devspec2array($1) if( $1 );
@devs = () if( int(@devs) == 1 && !defined($defs{$devs[0]}) );
} else {
@devs= grep { (($FW_rooms{$FW_room} && $FW_rooms{$FW_room}{$_}) ||
$FW_room eq "all") && !IsIgnored($_) } keys %defs;
}
my (%group, @atEnds, %usuallyAtEnd, %sortIndex);
my $nDevsInRoom = 0;
foreach my $dev (@devs) {
@ -3381,6 +3395,15 @@ FW_widgetOverride($$)
return $str;
}
sub
FW_show($$)
{
my ($hash, $param) = @_;
return "usage: show <devspec>" if( !$param);
$FW_room = "#devspec=$param";
return undef;
}
1;