fix antifreezeFn

This commit is contained in:
Marko Oldenburg 2020-02-03 09:01:41 +01:00
parent bca593a36c
commit 2ddda0c622

View File

@ -3193,10 +3193,11 @@ sub CreateNewNotifyDev($) {
sub ShuttersInformation($@) {
my ($FW_wname, $d, $room, $pageHash) = @_;
my ( $FW_wname, $d, $room, $pageHash ) = @_;
my $hash = $defs{$d};
my $ret = '<html><table><tr><h3>ASC Configuration and Information Summary</h3><td>';
my $ret =
'<html><table><tr><h3>ASC Configuration and Information Summary</h3><td>';
$ret .= '<table class="block wide">';
$ret .= '<tr class="even">';
$ret .= "<td><b>Shutters</b></td>";
@ -4698,6 +4699,11 @@ sub getFreezeStatus {
use POSIX qw(strftime);
my $self = shift;
my $daytime = strftime( "%P", localtime() );
$daytime = (
defined($daytime) and $daytime
? $daytime
: ( strftime( "%k", localtime() ) < 12 ? 'pm' : 'am' )
);
my $outTemp = $ascDev->getOutTemp;
$outTemp = $shutters->getOutTemp if ( $shutters->getOutTemp != -100 );
@ -7891,7 +7897,7 @@ sub getblockAscDrivesAfterManual {
],
"release_status": "testing",
"license": "GPL_2",
"version": "v0.8.14",
"version": "v0.8.15",
"author": [
"Marko Oldenburg <leongaultier@gmail.com>"
],