comparison after5.rb @ 89:00d203e72f8f draft

Put original received headers aside to reduce hop count
author HIROSE Yuuji <yuuji@gentei.org>
date Thu, 19 Dec 2013 12:09:58 +0900
parents c4ea79816b2d
children 48afc00ef5df
comparison
equal deleted inserted replaced
88:c4ea79816b2d 89:00d203e72f8f
2 # -*- coding: euc-jp -*- 2 # -*- coding: euc-jp -*-
3 # 3 #
4 # Associative Scheduling Table - after5 4 # Associative Scheduling Table - after5
5 # (C)2003, 2004, 2006, 2008, 2012, 2013 by HIROSE Yuuji [yuuji<at>gentei.org] 5 # (C)2003, 2004, 2006, 2008, 2012, 2013 by HIROSE Yuuji [yuuji<at>gentei.org]
6 # $Id: after5.rb,v 1.20 2012/12/03 15:54:20 yuuji Exp $ 6 # $Id: after5.rb,v 1.20 2012/12/03 15:54:20 yuuji Exp $
7 # Last modified Thu Dec 19 11:34:45 2013 on firestorm 7 # Last modified Thu Dec 19 12:09:19 2013 on firestorm
8 # See http://www.gentei.org/~yuuji/software/after5/ 8 # See http://www.gentei.org/~yuuji/software/after5/
9 # このスクリプトはEUCで保存してください。 9 # このスクリプトはEUCで保存してください。
10 $hgid = <<_HGID_.split[1..-2].join(" ") 10 $hgid = <<_HGID_.split[1..-2].join(" ")
11 $HGid$ 11 $HGid$
12 _HGID_ 12 _HGID_
2773 if (!comment || comment=="") && comment = @sc.ismembersemail(email) 2773 if (!comment || comment=="") && comment = @sc.ismembersemail(email)
2774 # Reverse conversion of uname<->email 2774 # Reverse conversion of uname<->email
2775 comment = @sc.nickname(comment) || "whoareyou" 2775 comment = @sc.nickname(comment) || "whoareyou"
2776 end 2776 end
2777 hold = ["From: "+rewritefrom(email, comment, fromhack)+"\n"] 2777 hold = ["From: "+rewritefrom(email, comment, fromhack)+"\n"]
2778 elsif /^received:/i =~ line
2779 # Put original received headers aside to reduce hop count
2780 line = "X-pre"+line
2778 end 2781 end
2779 if /^$/ =~ line.toeuc 2782 if /^$/ =~ line.toeuc
2780 hold << line 2783 hold << line
2781 break 2784 break
2782 end 2785 end

yatex.org