diff options
author | Petter Reinholdtsen <pere@hungry.com> | 2010-02-27 22:15:57 +0000 |
---|---|---|
committer | Petter Reinholdtsen <pere@hungry.com> | 2010-02-27 22:15:57 +0000 |
commit | d560e5a6cb161eb1bd1e84ae5fe534bf4a72f477 (patch) | |
tree | 842a4d83d95f688a1ee5c0808a6770baee34909c | |
parent | a92238486a301f8abe9632e0567e82566afd96fe (diff) |
Make it easier to process the downloaded ogg files.
-rwxr-xr-x | frikanalen/bin/scheduler | 9 |
1 files changed, 5 insertions, 4 deletions
diff --git a/frikanalen/bin/scheduler b/frikanalen/bin/scheduler index 874e663..184fb63 100755 --- a/frikanalen/bin/scheduler +++ b/frikanalen/bin/scheduler @@ -18,6 +18,7 @@ # libtimedate-perl # libwww-perl # vlc +# ezstream # libsoap-lite-perl # ttf-liberation @@ -228,7 +229,7 @@ if ($opts{'g'}) { my $id = $downloadreq{$url}; my $filename ; if ($opts {'o'} ) { - $filename = "$id.ogv"; + $filename = "broadcast-$id.ogv"; } else { $filename = "broadcast-$id.avi"; } @@ -348,9 +349,9 @@ sub schedule_stream { my $nowstring = strftime("%H:%M:%S", localtime(time())); my $file = ""; print "Playing '$title' $startstring-$stopstring (now $nowstring)\n"; - if ( -f "$id.ogv") { - print "info: Playing local $id.ogv\n"; - $file = "$id.ogv"; + if ( -f "broadcast-$id.ogv") { + print "info: Playing local broadcast-$id.ogv\n"; + $file = "broadcast-$id.ogv"; } if ($skiptonorecords && "true" eq $event->{'HasTonoRecords'}) { # XXX Should generate "Not allowed to play this" screen. |