X-Git-Url: http://git.freeside.biz/gitweb/?a=blobdiff_plain;f=index.cgi;h=b3e0a0745cceb37582f52e94739bb938a40cf069;hb=HEAD;hp=017986040dabd13296336375b0a4d38b14cb0152;hpb=87b59ca268e633ca01112997a89992e0a193a8fe;p=radio.haze.st.git diff --git a/index.cgi b/index.cgi index 0179860..b3e0a07 100755 --- a/index.cgi +++ b/index.cgi @@ -83,6 +83,20 @@ use Text::Template; 'url' => 'http://www.theoverworld.com/echo/', 'type' => 'rebroadcast', }, + 'sub_bass_sessions' => { + 'name' => 'Sub-Bass Sessions', + 'day' => 'tuesday', + 'start' => '20', + 'len' => '2', + 'type' => 'live', + }, + 'sub_bass_sessions_rebroadcast' => { + 'name' => 'Sub-Bass Sessions', + 'day' => 'wednesday', + 'start' => '13', + 'len' => '2', + 'type' => 'rebroadcast', + }, ); @times = qw( midnight 1am 2am 3am 4am 5am 6am 7am 8am 9am 10am 11am noon 1pm @@ -91,7 +105,8 @@ $increment = 0.5; $showstart = 12; $cgi = new CGI; -if ( $cgi->param('showstart') =~ /^(\d+)$/ ) { +if ( defined($cgi->param('showstart')) + && $cgi->param('showstart') =~ /^(\d+)$/ ) { die unless $1 < 24; $showstart = $1; }