From 3607d75e5cb24a30cd1f944d01c2d6d7c8470429 Mon Sep 17 00:00:00 2001
From: Christian Pointner <equinox@helsinki.at>
Date: Fri, 9 Oct 2015 02:27:57 +0200
Subject: semantics of DOW and STARTTIME has changed


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";
-- 
cgit v0.10.2