* 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 (file)
--- 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 (file)
--- 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)