# HG changeset patch
# User HIROSE Yuuji <yuuji@gentei.org>
# Date 1387422598 -32400
# Node ID 00d203e72f8fcd8ba8a084d0383fcf0c4f0507ef
# Parent  c4ea79816b2d89a570f3dba4da78508df83624ee
Put original received headers aside to reduce hop count

diff -r c4ea79816b2d -r 00d203e72f8f after5.rb
--- a/after5.rb	Thu Dec 19 11:35:24 2013 +0900
+++ b/after5.rb	Thu Dec 19 12:09:58 2013 +0900
@@ -4,7 +4,7 @@
 # Associative Scheduling Table - after5
 # (C)2003, 2004, 2006, 2008, 2012, 2013 by HIROSE Yuuji [yuuji<at>gentei.org]
 # $Id: after5.rb,v 1.20 2012/12/03 15:54:20 yuuji Exp $
-# Last modified Thu Dec 19 11:34:45 2013 on firestorm
+# Last modified Thu Dec 19 12:09:19 2013 on firestorm
 # See http://www.gentei.org/~yuuji/software/after5/
 # このスクリプトはEUCで保存してください。
 $hgid = <<_HGID_.split[1..-2].join(" ")
@@ -2775,6 +2775,9 @@
             comment = @sc.nickname(comment) || "whoareyou"
           end
           hold = ["From: "+rewritefrom(email, comment, fromhack)+"\n"]
+        elsif /^received:/i =~ line
+          # Put original received headers aside to reduce hop count
+          line = "X-pre"+line
         end
         if /^$/ =~ line.toeuc
           hold << line