From: Tim Pope <code@tpope.net>
Date: Thu, 25 Nov 2004 00:54:21 +0000 (+0000)
Subject: All dates on holiday "emails" are now in 1970
X-Git-Url: http://git.tpope.net/?p=tpope-extra.git;a=commitdiff_plain;h=b8bb02cb5dbe48a3e54658d61200afff5fde3b95

All dates on holiday "emails" are now in 1970
---

diff --git a/perl/sctweb b/perl/sctweb
index 99801a8..64c4127 100755
--- a/perl/sctweb
+++ b/perl/sctweb
@@ -272,7 +272,7 @@ sub do_mhc_schedule {
 	foreach (@mhc) {
 	    $_ =~ s/X-SC-Subject: ([^\n]*)/X-SC-Subject: $1\nSubject: $1/;
 	    $_ =~ s/X-SC-Category: ([^\n]*)/X-SC-Category: $1\nFrom: $1/;
-	    $_ =~ s/X-SC-Duration: (\d\d\d\d)(\d\d)(\d\d)-/"X-SC-Duration: $1$2$3-\nDate: $3 " . $mon[$2-1] . " $1 12:00:00 +0000"/e;
+	    $_ =~ s/X-SC-Duration: (\d\d\d\d)(\d\d)(\d\d)-/"X-SC-Duration: $1$2$3-\nDate: $3 " . $mon[$2-1] . " 1970 12:00:00 +0000"/e;
 	    push @mhc2, $_;
 	}
 	@mhc = @mhc2;