summaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
-rwxr-xr-xfrikanalen/bin/scheduler20
1 files changed, 10 insertions, 10 deletions
diff --git a/frikanalen/bin/scheduler b/frikanalen/bin/scheduler
index 23371bc..949bafb 100755
--- a/frikanalen/bin/scheduler
+++ b/frikanalen/bin/scheduler
@@ -101,20 +101,20 @@ sub plwrite {
kill SIGHUP => $ezpid;
kill SIGUSR1 => $ezpid;
}
- sleep 5;
- open PL, ">$ezplaylist" or die "Cannot open $ezplaylist for write :$!";
- print PL "fk-program.jpg\n";
- close PL;
- if ( $ezpid ) {
- kill SIGHUP => $ezpid; # Rearead playlist with pause screen, so that next loop
- # shows that and not the program again
- }
+ #sleep 5;
+ #open PL, ">$ezplaylist" or die "Cannot open $ezplaylist for write :$!";
+ #print PL "fk-program.jpg\n";
+ #close PL;
+ #if ( $ezpid ) {
+ # kill SIGHUP => $ezpid; # Rearead playlist with pause screen, so that next loop
+ # # shows that and not the program again
+ #}
}
sub ezstream_start {
my $ezstream = "/usr/bin/ezstream";
my $url = shift;
- &plwrite("fk-program.ogv");
+ &plwrite("fk-program.jpg");
print $ezcfg <<EOF if $ezcfg;
<ezstream>
<url>$url</url>
@@ -285,7 +285,7 @@ if ( $opts{"s"} ) {
$seq++;
}
- #print Dumper(@events);
+ print Dumper(@events);
my $suicide_time = `date -d '03:00 + 1 day' +%s`;
Event->timer(at => $suicide_time,
data => {},