From: yamaoka <yamaoka>
Date: Fri, 30 Oct 1998 03:34:42 +0000 (+0000)
Subject: * lisp/gnus-art.el (gnus-article-mime-edit-article-setup): Fix typo.
X-Git-Tag: pgnus-ichikawa-199811302358~123
X-Git-Url: http://git.chise.org/gitweb/?a=commitdiff_plain;h=792adbce0e1404dcb6de7bdda59654a2183fe6e4;p=elisp%2Fgnus.git-

* lisp/gnus-art.el (gnus-article-mime-edit-article-setup): Fix typo.
* lisp/gnus-draft.el (gnus-draft-decoding-function): Use
`mime-edit-decode-buffer' simply as initial value.
---

diff --git a/lisp/gnus-art.el b/lisp/gnus-art.el
index 960a91e..7440357 100644
--- a/lisp/gnus-art.el
+++ b/lisp/gnus-art.el
@@ -3011,7 +3011,7 @@ after replacing with the original article."
   (setq gnus-article-edit-done-function
 	`(lambda (&rest args)
 	   (when (featurep 'font-lock)
-	     (setq font-lockfont-lock-defaults-defaults nil)
+	     (setq font-lock-defaults nil)
 	     (font-lock-mode 0))
 	   (mime-edit-exit)
 	   (let (case-fold-search)
diff --git a/lisp/gnus-draft.el b/lisp/gnus-draft.el
index 49b9715..66e99ae 100644
--- a/lisp/gnus-draft.el
+++ b/lisp/gnus-draft.el
@@ -184,11 +184,7 @@
 ;;; Utility functions
 
 (defcustom gnus-draft-decoding-function
-  (function
-   (lambda ()
-     (mime-edit-decode-buffer nil)
-     (eword-decode-header)
-     ))
+  #'mime-edit-decode-buffer
   "*Function called to decode the message from network representation."
   :group 'gnus-agent
   :type 'function)