From: akr <akr>
Date: Mon, 18 Jan 1999 13:57:07 +0000 (+0000)
Subject: Deal with bare LF as newline.
X-Git-Tag: akemi-1_12-199901181900~1
X-Git-Url: http://git.chise.org/gitweb/?p=elisp%2Fsemi.git;a=commitdiff_plain;h=51cbddec75b944d81f1ed692a95ba8cc2d57c2a9

Deal with bare LF as newline.
---

diff --git a/mime-view.el b/mime-view.el
index 16b2dc7..7b91b1e 100644
--- a/mime-view.el
+++ b/mime-view.el
@@ -471,7 +471,7 @@ Each elements are regexp of field-name.")
     (insert (string-as-multibyte (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
        (concat