From 2bb1edeb6981c608ddc0d7aa6af6fc658af7bfc7 Mon Sep 17 00:00:00 2001
From: Tim Pope <code@tpope.net>
Date: Tue, 16 Aug 2005 07:54:15 +0000
Subject: [PATCH] Grr... bug fix

---
 perl/sct6 | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/perl/sct6 b/perl/sct6
index e55560f..843f103 100755
--- a/perl/sct6
+++ b/perl/sct6
@@ -511,7 +511,7 @@ sub do_html_schedule {
     print "</th></tr>\n";
 	foreach my $row (@schedule) {
 	    map { s/\n/<br \/>/g; $_} %$row;
-	    $row->{'duration'} =~ s/-/\n/g;
+	    $row->{'duration'} =~ s/-/<br \/>/g;
 	    $row->{'duration'} =~ s/\d\d(\d\d)(\d\d)(\d\d)/$2-$3-$1/g;
 	    print '<tr class="'.$shade.'">';
 	    $shade = ($shade eq "dark"?"light":"dark");
-- 
2.30.2