diff options
-rwxr-xr-x | lib/rddb.pm | 5 | ||||
-rwxr-xr-x | rh-bin/listdropboxes.cgi | 4 |
2 files changed, 9 insertions, 0 deletions
diff --git a/lib/rddb.pm b/lib/rddb.pm index 1d6102a..a5c1f20 100755 --- a/lib/rddb.pm +++ b/lib/rddb.pm @@ -167,6 +167,11 @@ sub get_dropboxes substr($p[3], 2, 0) = ':'; $entry->{'SHOWSTARTTIME'} = $p[3]; $entry->{'SHOWLEN'} = int $p[4]; + } elsif($p[0] eq "J") { + $entry->{'TYPE'} = 'jingle'; + $entry->{'JINGLETITLE'} = $groupdesc; + $entry->{'JINGLECART'} = int $p[1]; + $entry->{'JINGLECARTDISABLED'} = int $p[2]; } push @allowed_dbs, $entry; diff --git a/rh-bin/listdropboxes.cgi b/rh-bin/listdropboxes.cgi index 189e6cf..bfdc925 100755 --- a/rh-bin/listdropboxes.cgi +++ b/rh-bin/listdropboxes.cgi @@ -83,6 +83,10 @@ if($responsecode != 200) { print " <show-dayofweek>" . $href->{'SHOWDOW'} . "</show-dayofweek>\n"; print " <show-starttime>" . $href->{'SHOWSTARTTIME'} . "</show-starttime>\n"; print " <show-length>" . $href->{'SHOWLEN'} . "</show-length>\n"; + } elsif($href->{'TYPE'} eq "jingle") { + print " <jingle-title>" . $href->{'JINGLETITLE'} . "</jingle-title>\n"; + print " <jingle-cart>" . $href->{'JINGLECART'} . "</jingle-cart>\n"; + print " <jingle-cartdisabled>" . $href->{'JINGLECARTDISABLED'} . "</jingle-cartdisabled>\n"; } print " </dropbox>\n"; } |