mirror of
https://github.com/fhem/fhem-mirror.git
synced 2025-05-04 22:19:38 +00:00
25 lines
704 B
Perl
25 lines
704 B
Perl
##############################################
|
|
# test update timer
|
|
# perl /opt/fhem/fhem.pl -t /opt/fhem/t/...
|
|
##############################################
|
|
package main;
|
|
use strict;
|
|
use warnings;
|
|
use Test::More;
|
|
|
|
fhem('set M1 interval 0.2');
|
|
is(FhemTestUtils_gotLog("changed interval to 0.2 seconds"), 1, "set interval in log");
|
|
fhem('set M1 interval test');
|
|
is(FhemTestUtils_gotLog("set interval test not valid"), 1, "invalid interval in log");
|
|
|
|
|
|
InternalTimer(time()+1, sub() {
|
|
isnt(FhemTestUtils_gotLog("GetUpdate .* called from"), 0, "GetUpdate in log");
|
|
isnt(FhemTestUtils_gotLog("UpdateTimer called from.*GetUpdate"), 0, "UpdateTimer in log");
|
|
|
|
done_testing;
|
|
exit(0);
|
|
}, 0);
|
|
|
|
1;
|