summaryrefslogtreecommitdiff
path: root/lisp/gnus/message.el
diff options
context:
space:
mode:
authorDaiki Ueno <ueno@unixuser.org>2011-03-05 03:56:02 +0000
committerKatsumi Yamaoka <yamaoka@jpl.org>2011-03-05 03:56:02 +0000
commit8879add883a672abcf54df796788a68116529a2d (patch)
treedcc1027ff5720b96f36b7d09070d413f7014743a /lisp/gnus/message.el
parenta9eeff78d5bdcb9e03055376705e8f31fe145b79 (diff)
downloademacs-8879add883a672abcf54df796788a68116529a2d.tar.gz
message.el (message-options): Don't mark it buffer-local when running under XEmacs.
Diffstat (limited to 'lisp/gnus/message.el')
-rw-r--r--lisp/gnus/message.el7
1 files changed, 6 insertions, 1 deletions
diff --git a/lisp/gnus/message.el b/lisp/gnus/message.el
index 58daf1baf94..242a6baabee 100644
--- a/lisp/gnus/message.el
+++ b/lisp/gnus/message.el
@@ -1814,7 +1814,12 @@ You must have the \"hashcash\" binary installed, see `hashcash-path'."
(defvar message-options nil
"Some saved answers when sending message.")
-(make-variable-buffer-local 'message-options)
+;; FIXME: On XEmacs this causes problems since let-binding like:
+;; (let ((message-options message-options)) ...)
+;; as in `message-send' and `mml-preview' loses to buffer-local
+;; variable initialization.
+(unless (featurep 'xemacs)
+ (make-variable-buffer-local 'message-options))
(defvar message-send-mail-real-function nil
"Internal send mail function.")