* mmgeneric.el (mime-insert-header-from-buffer): Do not contain : in

`original-field-name'.

diff --git a/ChangeLog b/ChangeLog
index c6992bc..02912ec 100644 (file)
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,10 +1,15 @@
+1999-01-20  Tanaka Akira      <akr@jaist.ac.jp>
+
+       * mmgeneric.el (mime-insert-header-from-buffer): Do not contain : in
+       `original-field-name'.
+
 1999-01-17  Tanaka Akira      <akr@jaist.ac.jp>
 
        * ew-compat.el (ew-mime-update-field-decoder-cache): Abolished
        because duplicated.
 
        * mmgeneric.el (mime-insert-header-from-buffer): Convert LF to CRLF for
-       original-field-body.
+       `original-field-body'.
 
 1999-01-05  Tanaka Akira      <akr@jaist.ac.jp>
 

diff --git a/mmgeneric.el b/mmgeneric.el
index f015b4f..a95c119 100644 (file)
--- a/mmgeneric.el
+++ b/mmgeneric.el
@@ -178,7 +178,7 @@
                        field-body))
              (insert "\n")
               (add-text-properties p (point)
-                                   (list 'original-field-name field-name
+                                   (list 'original-field-name (substring field-name 0 (1- len))
                                          'original-field-body (ew-lf-to-crlf field-body)))
              )))))))