# HG changeset patch
# User HIROSE Yuuji <yuuji@gentei.org>
# Date 1354550116 -32400
# Node ID 53e7474955023ec6b4de4d76ca740853666d0230
# Parent  360d7144ab8d6107d9ea89cb33d9e0270f81d61d
Bug-fix: Regexp matching should be done in euc-jp.

diff -r 360d7144ab8d -r 53e747495502 after5.rb
--- a/after5.rb	Thu Nov 29 12:37:02 2012 +0900
+++ b/after5.rb	Tue Dec 04 00:55:16 2012 +0900
@@ -3,8 +3,8 @@
 #
 # Associative Scheduling Table - after5
 # (C)2003, 2004, 2006, 2008, 2012 by HIROSE Yuuji [yuuji<at>gentei.org]
-# $Id: after5.rb,v 1.19 2012/04/01 11:52:25 yuuji Exp yuuji $
-# Last modified Thu Nov 29 12:35:05 2012 on firestorm
+# $Id: after5.rb,v 1.20 2012/12/03 15:54:20 yuuji Exp $
+# Last modified Tue Dec  4 00:53:29 2012 on firestorm
 # See http://www.gentei.org/~yuuji/software/after5/
 # このスクリプトはEUCで保存してください。
 $hgid = <<_HGID_.split[1..-2].join(" ")
@@ -1645,7 +1645,7 @@
     open(newfile, "w") do |spoolfile|
       countdone = nil
       while line=STDIN.gets
-        if !countdone && /^X-ML-Name: / =~ line
+        if !countdone && /^X-ML-Name: / =~ line.toeuc
           line += sprintf("X-Mail-Count: %d\n", seq) 
           coutndone=true
         end