change get ShuttersInformation, add SummaryFn
This commit is contained in:
parent
85d5ffefba
commit
42e4fdcc44
@ -323,6 +323,7 @@ sub Initialize($) {
|
||||
. 'ASC_debug:1 '
|
||||
. $readingFnAttributes;
|
||||
$hash->{NotifyOrderPrefix} = '51-'; # Order Nummer für NotifyFn
|
||||
$hash->{FW_detailFn} = 'FHEM::AutoShuttersControl::ShuttersInformation';
|
||||
|
||||
return FHEM::Meta::InitMod( __FILE__, $hash );
|
||||
}
|
||||
@ -680,20 +681,13 @@ sub Get($$@) {
|
||||
|
||||
my ( $cmd, @args ) = @aa;
|
||||
|
||||
if ( lc $cmd eq 'showshuttersinformations' ) {
|
||||
return "usage: $cmd" if ( @args != 0 );
|
||||
my $ret = GetShuttersInformation($hash);
|
||||
return $ret;
|
||||
}
|
||||
elsif ( lc $cmd eq 'shownotifydevsinformations' ) {
|
||||
if ( lc $cmd eq 'shownotifydevsinformations' ) {
|
||||
return "usage: $cmd" if ( @args != 0 );
|
||||
my $ret = GetMonitoredDevs($hash);
|
||||
return $ret;
|
||||
}
|
||||
else {
|
||||
my $list = "";
|
||||
$list .= " showShuttersInformations:noArg"
|
||||
if ( ReadingsVal( $name, 'userAttrList', 'none' ) eq 'rolled out' );
|
||||
$list .= " showNotifyDevsInformations:noArg"
|
||||
if ( ReadingsVal( $name, 'userAttrList', 'none' ) eq 'rolled out'
|
||||
and AttrVal( $name, 'ASC_expert', 0 ) == 1 );
|
||||
@ -3197,9 +3191,12 @@ sub CreateNewNotifyDev($) {
|
||||
$hash->{NOTIFYDEV} = $hash->{NOTIFYDEV} . $shuttersList;
|
||||
}
|
||||
|
||||
sub GetShuttersInformation($) {
|
||||
my $hash = shift;
|
||||
my $ret = '<html><table><tr><td>';
|
||||
sub ShuttersInformation($@) {
|
||||
|
||||
my ($FW_wname, $d, $room, $pageHash) = @_;
|
||||
my $hash = $defs{$d};
|
||||
|
||||
my $ret = '<html><table><tr><h3>ASC Configuration Summary</h3><td>';
|
||||
$ret .= '<table class="block wide">';
|
||||
$ret .= '<tr class="even">';
|
||||
$ret .= "<td><b>Shutters</b></td>";
|
||||
@ -3275,7 +3272,8 @@ sub GetShuttersInformation($) {
|
||||
$linecount++;
|
||||
}
|
||||
$ret .= '</table></td></tr>';
|
||||
$ret .= '</table></html>';
|
||||
$ret .= '</table></html><br /><br />';
|
||||
|
||||
return $ret;
|
||||
}
|
||||
|
||||
@ -7897,7 +7895,7 @@ sub getblockAscDrivesAfterManual {
|
||||
],
|
||||
"release_status": "under develop",
|
||||
"license": "GPL_2",
|
||||
"version": "v0.8.13",
|
||||
"version": "v0.8.14",
|
||||
"author": [
|
||||
"Marko Oldenburg <leongaultier@gmail.com>"
|
||||
],
|
||||
|
Loading…
x
Reference in New Issue
Block a user