diff options
author | Christian Pointner <equinox@helsinki.at> | 2015-10-09 00:27:57 (GMT) |
---|---|---|
committer | Christian Pointner <equinox@helsinki.at> | 2015-10-09 00:27:57 (GMT) |
commit | 3607d75e5cb24a30cd1f944d01c2d6d7c8470429 (patch) | |
tree | cfd99c5468f1cbde39e9dad2680f6734762f1b51 /rh-bin/listdropboxes.cgi | |
parent | 3d4e3c745e98462c96e6a998857c3ce03a5b3e96 (diff) |
semantics of DOW and STARTTIME has changed
Diffstat (limited to 'rh-bin/listdropboxes.cgi')
-rwxr-xr-x | rh-bin/listdropboxes.cgi | 8 |
1 files changed, 6 insertions, 2 deletions
diff --git a/rh-bin/listdropboxes.cgi b/rh-bin/listdropboxes.cgi index f00e28e..a451dc7 100755 --- a/rh-bin/listdropboxes.cgi +++ b/rh-bin/listdropboxes.cgi @@ -77,12 +77,16 @@ if($responsecode != 200) { print " <parameters>" . xml_quote($href->{'PARAM'}) . "</parameters>\n"; print " <type>" . xml_quote($href->{'TYPE'}) . "</type>\n"; if($href->{'TYPE'} eq "show") { + my $dow = $href->{'SHOWDOW'}; + $dow = 0 unless $dow < 7; + my $starttime = $href->{'SHOWSTARTTIME'}; + substr($starttime, 2, 0) = ':'; print " <show-id>" . xml_quote($href->{'SHOWID'}) . "</show-id>\n"; print " <show-title>" . xml_quote($href->{'SHOWTITLE'}) . "</show-title>\n"; print " <show-log>" . xml_quote($href->{'SHOWLOG'}) . "</show-log>\n"; print " <show-rhythm>" . xml_quote($href->{'SHOWRHYTHM'}) . "</show-rhythm>\n"; - print " <show-dayofweek>" . xml_quote($href->{'SHOWDOW'}) . "</show-dayofweek>\n"; - print " <show-starttime>" . xml_quote($href->{'SHOWSTARTTIME'}) . "</show-starttime>\n"; + print " <show-dayofweek>" . xml_quote($dow) . "</show-dayofweek>\n"; + print " <show-starttime>" . xml_quote($starttime) . "</show-starttime>\n"; print " <show-length>" . xml_quote($href->{'SHOWLEN'}) . "</show-length>\n"; } elsif($href->{'TYPE'} eq "jingle") { print " <jingle-title>" . xml_quote($href->{'JINGLETITLE'}) . "</jingle-title>\n"; |