changeset 76:53e747495502 draft

Bug-fix: Regexp matching should be done in euc-jp.
author HIROSE Yuuji <yuuji@gentei.org>
date Tue, 04 Dec 2012 00:55:16 +0900
parents 360d7144ab8d
children ff9e5fa124d2
files after5.rb
diffstat 1 files changed, 3 insertions(+), 3 deletions(-) [+]
line wrap: on
line diff
--- 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

yatex.org