Merge pull request #231 from duc996/fix_blocked_main_loop

Fix bug fixes #230 where the main loop sleeps forever.
This commit is contained in:
Jordi Sanfeliu 2019-04-30 09:52:02 +02:00 committed by GitHub
commit 638ca91bdd
No known key found for this signature in database
GPG Key ID: 4AEE18F83AFDEB23
1 changed files with 2 additions and 3 deletions

View File

@ -737,9 +737,8 @@ logger("Ok, ready.");
# main loop
while(1) {
local $SIG{'ALRM'} = sub { };
alarm(1);
pause();
select undef, undef, undef, 1.0;
my ($sec, $min, $hour, $mday, $mon, undef, $wday) = localtime(time);