Mercurial > hgrepos > hgweb.cgi > after5
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