From: yamaoka <yamaoka>
Date: Mon, 29 Jan 2001 01:34:21 +0000 (+0000)
Subject: (gnus-article-mime-edit-exit): Use `buffer-substring-no-properties' instead of
X-Git-Tag: t-gnus-6_15_0-05-quimby-last-~23
X-Git-Url: http://git.chise.org/gitweb/?a=commitdiff_plain;h=25d5e1beac31a60d505564456447fcf3150036e5;p=elisp%2Fgnus.git-

(gnus-article-mime-edit-exit): Use `buffer-substring-no-properties' instead of
 `format'.
---

diff --git a/ChangeLog b/ChangeLog
index 8016e40..6c77044 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,3 +1,8 @@
+2001-01-29  Katsumi Yamaoka <yamaoka@jpl.org>
+
+	* lisp/gnus-art.el (gnus-article-mime-edit-exit): Use
+	`buffer-substring-no-properties' instead of `format'.
+
 2001-01-23  TAKAHASHI Kaoru  <kaoru@kaisei.org>
 
 	* texi/ptexinfmt.el: Support @letterpaper and @afivepaper.
diff --git a/lisp/gnus-art.el b/lisp/gnus-art.el
index 378e831..145d268 100644
--- a/lisp/gnus-art.el
+++ b/lisp/gnus-art.el
@@ -5064,7 +5064,7 @@ after replacing with the original article."
       (setq font-lock-defaults nil)
       (font-lock-mode 0))
     ;; We remove all text props from the article buffer.
-    (setq buf (format "%s" (buffer-string)))
+    (setq buf (buffer-substring-no-properties (point-min) (point-max)))
     (set-buffer (get-buffer-create gnus-original-article-buffer))
     (erase-buffer)
     (insert buf)