[Top][All Lists]
[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[Emacs-commit] emacs/lisp/mh-e mh-comp.el ChangeLog
From: |
Bill Wohler |
Subject: |
[Emacs-commit] emacs/lisp/mh-e mh-comp.el ChangeLog |
Date: |
Wed, 11 Jan 2006 09:14:15 +0000 |
CVSROOT: /cvsroot/emacs
Module name: emacs
Branch:
Changes by: Bill Wohler <address@hidden> 06/01/11 09:14:14
Modified files:
lisp/mh-e : mh-comp.el ChangeLog
Log message:
(mh-forward): Cosmetics on prompt when draft exists.
(mh-send-letter): Add -msgid to mh-send-args (closes SF #725425).
CVSWeb URLs:
http://cvs.savannah.gnu.org/viewcvs/emacs/emacs/lisp/mh-e/mh-comp.el.diff?tr1=1.38&tr2=1.39&r1=text&r2=text
http://cvs.savannah.gnu.org/viewcvs/emacs/emacs/lisp/mh-e/ChangeLog.diff?tr1=1.109&tr2=1.110&r1=text&r2=text
Patches:
Index: emacs/lisp/mh-e/ChangeLog
diff -u emacs/lisp/mh-e/ChangeLog:1.109 emacs/lisp/mh-e/ChangeLog:1.110
--- emacs/lisp/mh-e/ChangeLog:1.109 Wed Jan 11 09:01:22 2006
+++ emacs/lisp/mh-e/ChangeLog Wed Jan 11 09:14:14 2006
@@ -1,5 +1,8 @@
2006-01-11 Bill Wohler <address@hidden>
+ * mh-comp.el (mh-forward): Cosmetics on prompt when draft exists.
+ (mh-send-letter): Add -msgid to mh-send-args (closes SF #725425).
+
* mh-utils.el (mh-x-image-url-cache-canonicalize): Use
url-hexify-string to remove special characters from filenames
(closes SF #1396499). Note that this invalidates the existing
Index: emacs/lisp/mh-e/mh-comp.el
diff -u emacs/lisp/mh-e/mh-comp.el:1.38 emacs/lisp/mh-e/mh-comp.el:1.39
--- emacs/lisp/mh-e/mh-comp.el:1.38 Wed Jan 11 07:46:57 2006
+++ emacs/lisp/mh-e/mh-comp.el Wed Jan 11 09:14:14 2006
@@ -378,7 +378,7 @@
;; forw always leaves file in "draft" since it doesn't have -draft
(draft-name (expand-file-name "draft" mh-user-path))
(draft (cond ((or (not (file-exists-p draft-name))
- (y-or-n-p "The file 'draft' exists. Discard it? "))
+ (y-or-n-p "The file draft exists; discard it? "))
(mh-exec-cmd "forw" "-build"
(if (and (mh-variant-p 'nmh)
mh-compose-forward-as-mime-flag)
@@ -1475,12 +1475,16 @@
(and (boundp 'default-buffer-file-coding-system )
default-buffer-file-coding-system)
'iso-latin-1))))
+ ;; Adding a Message-ID field looks good, makes it easier to search for
+ ;; message in your +outbox, and best of all doesn't break threading for
+ ;; the recipient if you reply to a message in your +outbox.
+ (setq mh-send-args (concat "-msgid " mh-send-args))
;; The default BCC encapsulation will make a MIME message unreadable.
;; With nmh use the -mime arg to prevent this.
(if (and (mh-variant-p 'nmh)
(mh-goto-header-field "Bcc:")
(mh-goto-header-field "Content-Type:"))
- (setq mh-send-args (format "-mime %s" mh-send-args)))
+ (setq mh-send-args (concat "-mime " mh-send-args)))
(cond (arg
(pop-to-buffer mh-mail-delivery-buffer)
(erase-buffer)