2001-11-25 15:00:00 ShengHuo ZHU <zsh@cs.rochester.edu>

	* mm-util.el (mm-coding-system-priorities): Add backslash in the doc.

	* message.el (message-setup-1): Clean up mc-*.

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 636573c..3f9299e 100644 (file)
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,9 @@
+2001-11-25 15:00:00  ShengHuo ZHU  <zsh@cs.rochester.edu>
+
+       * mm-util.el (mm-coding-system-priorities): Add backslash in the doc.
+
+       * message.el (message-setup-1): Clean up mc-*.
+
 2001-11-25 09:00:00  ShengHuo ZHU  <zsh@cs.rochester.edu>
 
        * gnus-util.el (gnus-directory-sep-char-regexp): New.

diff --git a/lisp/message.el b/lisp/message.el
index 008962d..256ad5b 100644 (file)
--- a/lisp/message.el
+++ b/lisp/message.el
@@ -4183,13 +4183,7 @@ than 988 characters long, and if they are not, trim them until they are."
                              headers)
                      nil switch-function yank-action actions)))))
 
-;;;(defvar mc-modes-alist)
 (defun message-setup-1 (headers &optional replybuffer actions)
-;;;   (when (and (boundp 'mc-modes-alist)
-;;;         (not (assq 'message-mode mc-modes-alist)))
-;;;     (push '(message-mode (encrypt . mc-encrypt-message)
-;;;                     (sign . mc-sign-message))
-;;;      mc-modes-alist))
   (dolist (action actions)
     (condition-case nil
        (add-to-list 'message-send-actions

diff --git a/lisp/mm-util.el b/lisp/mm-util.el
index 3844f32..afe9f6c 100644 (file)
--- a/lisp/mm-util.el
+++ b/lisp/mm-util.el
@@ -277,7 +277,7 @@ outgoing mails (see `sort-coding-systems').  If this variable is set,
 it overrides the default priority.  For example, Japanese users may
 prefer iso-2022-jp to japanese-shift-jis:
 
-(setq mm-coding-system-priorities
+\(setq mm-coding-system-priorities
   '(iso-2022-jp iso-2022-jp-2 japanese-shift-jis utf-8))
 ")