mirror/emacs
1
0
Fork 0
mirror of https://git.savannah.gnu.org/git/emacs.git synced 2024-11-24 07:20:37 +00:00
Code Issues Releases Activity

* message.el (message-send): Don't use mail-hist by default.

Browse Source
This commit is contained in:
Lars Magne Ingebrigtsen 1996-07-16 23:29:39 +00:00
parent 97e6de3847
commit 496110ef79
1 changed files with 4 additions and 4 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

8
lisp/message.el
View File

@ -822,8 +822,8 @@ C-c C-r message-ceasar-buffer-body (rot13 the message body)."
(setq message-sent-message-via nil)
(make-local-variable 'message-checksum)
(setq message-checksum nil)
(when (fboundp 'mail-hist-define-keys)
(mail-hist-define-keys))
;;(when (fboundp 'mail-hist-define-keys)
;; (mail-hist-define-keys))
(when (string-match "XEmacs\\|Lucid" emacs-version)
(message-setup-toolbar))
(easy-menu-add message-mode-menu message-mode-map)
@ -1255,8 +1255,8 @@ the user from the mailer."
"Already sent message via mail; resend? "))
(message-send-mail arg))))
(message-do-fcc)
(when (fboundp 'mail-hist-put-headers-into-history)
(mail-hist-put-headers-into-history))
;;(when (fboundp 'mail-hist-put-headers-into-history)
;; (mail-hist-put-headers-into-history))
(run-hooks 'message-sent-hook)
(message "Sending...done")
;; If buffer has no file, mark it as unmodified and delete autosave.