From 75936eb179531ffb9ff2df7e06056d2287d3ce79 Mon Sep 17 00:00:00 2001
From: akr <akr>
Date: Sat, 7 Nov 1998 19:03:02 +0000
Subject: [PATCH] * mime-view.el: (mime-display-text/x-vcard): Preserve
 encoding.

---
 ChangeLog    |    4 ++++
 mime-view.el |   14 ++++++++------
 2 files changed, 12 insertions(+), 6 deletions(-)

diff --git a/ChangeLog b/ChangeLog
index 482cb93..fcb22b7 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,5 +1,9 @@
 1998-11-07  Tanaka Akira  <akr@jaist.ac.jp>
 
+        * mime-view.el: (mime-display-text/x-vcard): Preserve encoding.
+
+1998-11-07  Tanaka Akira  <akr@jaist.ac.jp>
+
         * mime-view.el: (mime-display-text/x-vcard): New function.
         (mime-preview-condition): Set up for 'mime-preview-text/x-vcard.
 
diff --git a/mime-view.el b/mime-view.el
index a707658..2082861 100644
--- a/mime-view.el
+++ b/mime-view.el
@@ -466,14 +466,16 @@ Each elements are regexp of field-name.")
     (insert (mime-entity-content entity))
     (goto-char (point-min))
     (while (re-search-forward
-            "\\(;ENCODING=QUOTED-PRINTABLE:\\)\\(\\(=[0-9A-F][0-9A-F]\\|=\r\n\\|[^\r\n]\\)*\\)"
+            "\\(;\\(encoding=\\)quoted-printable:\\)\\(\\(=[0-9A-F][0-9A-F]\\|=\r\n\\|[^\r\n]\\)*\\)"
             nil t)
       (replace-match
-       (string-as-multibyte
-        (mime-decode-string
-         (decode-coding-string
-          (buffer-substring (match-beginning 2) (match-end 2)) 'raw-text-dos)
-         "quoted-printable"))
+       (concat
+        (buffer-substring (match-beginning 1) (match-end 1))
+        (string-as-multibyte
+         (mime-decode-string
+          (decode-coding-string
+           (buffer-substring (match-beginning 3) (match-end 3)) 'raw-text-dos)
+          "quoted-printable")))
        t t))
     (decode-coding-region (point-min) (point-max) 'undecided)
     (goto-char (point-max))
-- 
1.7.10.4