X-Git-Url: http://git.tpope.net/?p=tpope-extra.git;a=blobdiff_plain;f=perl%2Fsct6;h=843f1030f03e510c119e140704e815848e387206;hp=e55560f933d34383a9b0b716d8220cf4e729a91b;hb=2bb1edeb6981c608ddc0d7aa6af6fc658af7bfc7;hpb=d1ec907270171b67fa0fb3cf55f2b3b88c4cd412
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 "\n";
foreach my $row (@schedule) {
map { s/\n/
/g; $_} %$row;
- $row->{'duration'} =~ s/-/\n/g;
+ $row->{'duration'} =~ s/-/
/g;
$row->{'duration'} =~ s/\d\d(\d\d)(\d\d)(\d\d)/$2-$3-$1/g;
print '