diff -urN tmail-0.10.8-orig/lib/tmail/mail.rb tmail-0.10.8/lib/tmail/mail.rb
--- tmail-0.10.8-orig/lib/tmail/mail.rb	2004-02-20 03:35:01 +0300
+++ tmail-0.10.8/lib/tmail/mail.rb	2004-04-28 13:38:13 +0400
@@ -34,6 +34,7 @@
       @config = Config.to_config(conf)
 
       @header      = {}
+      @header_orig = {}
       @body_port   = nil
       @body_parsed = false
       @epilogue    = ''
@@ -589,6 +590,10 @@
       @header.dup
     end
 
+    def header_orig
+      @header_orig.dup
+    end
+
     def [](key)
       @header[key.downcase]
     end
@@ -707,8 +712,10 @@
     def parse_header(f)
       name = field = nil
       unixfrom = nil
+      orig = ''
 
       while line = f.gets
+        orig += line
         case line
         when /\A[ \t]/             # continue from prev line
           raise SyntaxError, 'mail is began by space' unless field
@@ -732,6 +739,7 @@
       if unixfrom
         add_hf 'Return-Path', "<#{unixfrom}>" unless @header['return-path']
       end
+      add_oh orig
     end
 
     def add_hf(name, field)
@@ -749,6 +757,10 @@
       HeaderField.new(name, field, @config)
     end
 
+    def add_oh( str )
+      @header_orig = str
+    end
+
     ###
     ### Message Body
     ###