From: yamaoka <yamaoka>
Date: Tue, 24 Apr 2007 00:04:09 +0000 (+0000)
Subject: (turn-on-mime-edit): Make paragraph-start and paragraph-separate buffer-local.
X-Git-Tag: semi-1_14-wl-root~13
X-Git-Url: http://git.chise.org/gitweb/?a=commitdiff_plain;h=be857c5177662d1660e785bbc07185343013a8a3;p=elisp%2Fsemi.git

(turn-on-mime-edit): Make paragraph-start and paragraph-separate buffer-local.
---

diff --git a/ChangeLog b/ChangeLog
index 2cfce22..a2f9d51 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,3 +1,8 @@
+2007-04-24  Katsumi Yamaoka  <yamaoka@jpl.org>
+
+	* mime-edit.el (turn-on-mime-edit): Make paragraph-start and
+	paragraph-separate buffer-local.
+
 2006-12-20  MORIOKA Tomohiko  <tomo@kanji.zinbun.kyoto-u.ac.jp>
 
 	* README.ja, README.en (Required environment): Update required
diff --git a/mime-edit.el b/mime-edit.el
index 26938e9..2347dac 100644
--- a/mime-edit.el
+++ b/mime-edit.el
@@ -1067,13 +1067,14 @@ User customizable variables (not documented all of them):
 
     (enable-invisible)
 
-    ;; I don't care about saving these.
-    (setq paragraph-start
-	  (regexp-or mime-edit-single-part-tag-regexp
-		     paragraph-start))
-    (setq paragraph-separate
-	  (regexp-or mime-edit-single-part-tag-regexp
-		     paragraph-separate))
+    ;; Make `paragraph-start' and `paragraph-separate' buffer-local
+    ;; and have a value to recognize part tags.
+    (set (make-local-variable 'paragraph-start)
+	 (regexp-or mime-edit-single-part-tag-regexp
+		    (default-value 'paragraph-start)))
+    (set (make-local-variable 'paragraph-separate)
+	 (regexp-or mime-edit-single-part-tag-regexp
+		    (default-value 'paragraph-separate)))
     (run-hooks 'mime-edit-mode-hook)
     (message
      "%s"