[Mew-dist 11970] Re: im-133 y2k bugfix (Fw: [Kondara-devel:01032])

[SAITO Tetsuya ( さいとてつや )]

さいとです．

From: Hidetomo Hosono <h at example.com>
Subject: [Mew-dist 11969] Re: im-133 y2k bugfix (Fw: [Kondara-devel:01032])
Date: Sun, 2 Jan 2000 20:36:27 +0900
Message-Id:<20000102202429F.h at example.com>

h> 　という結果になりました。このパッチが一番良さそうですね。お騒がせ
h> しました。

すいません，以下でいいんですね(^^;)．

-- 
日誌読んでます :)＞ほそのさん
さいとてつや (saito at example.com)
-------------- next part --------------
--- IM/Scan.pm.orig	Sun Jan  2 21:01:45 2000
+++ IM/Scan.pm	Sun Jan  2 21:02:16 2000
@@ -435,7 +435,7 @@
 	}
 
 	$href->{'date:'} = sprintf "%s, %d %s %d %02d:%02d:%02d %s",
-			$WSTR[$wday], $mday, $MSTR[$mon], $year,
+			$WSTR[$wday], $mday, $MSTR[$mon], $year + 1900,
 			$hour, $min, $sec, $tz;
     }
 
@@ -449,7 +449,7 @@
 	$sec = $1;
     }
 
-    if ($year < 70) {
+    if ($year < 50) {
 	$year += 2000;
     } elsif ($year < 100) {
 	$year += 1900;