From: Tim Pope Date: Tue, 16 Aug 2005 07:54:15 +0000 (+0000) Subject: Grr... bug fix X-Git-Url: http://git.tpope.net/?p=tpope-extra.git;a=commitdiff_plain;h=2bb1edeb6981c608ddc0d7aa6af6fc658af7bfc7 Grr... bug fix --- 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 ''; $shade = ($shade eq "dark"?"light":"dark");