aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorGerd Moellmann1999-11-10 10:46:01 +0000
committerGerd Moellmann1999-11-10 10:46:01 +0000
commit016fbe59f0fe49c55cd906aee6e1869298431caa (patch)
treec8e038951b4c81486ea904fea315641b8a2c06a7
parent4ea68fcc0e824da2afe4889b71a4a3e8878ca5a8 (diff)
downloademacs-016fbe59f0fe49c55cd906aee6e1869298431caa.tar.gz
emacs-016fbe59f0fe49c55cd906aee6e1869298431caa.zip
(mh-smail-batch): If TO is nil, use "" as
to-address.
-rw-r--r--lisp/mail/mh-comp.el4
1 files changed, 2 insertions, 2 deletions
diff --git a/lisp/mail/mh-comp.el b/lisp/mail/mh-comp.el
index ceb38043e11..bd12688cbc1 100644
--- a/lisp/mail/mh-comp.el
+++ b/lisp/mail/mh-comp.el
@@ -26,7 +26,7 @@
26 26
27;;; Change Log: 27;;; Change Log:
28 28
29;; $Id: mh-comp.el,v 1.14 1999/03/01 03:47:07 kwzh Exp rms $ 29;; $Id: mh-comp.el,v 1.15 1999/09/04 00:08:17 rms Exp $
30 30
31;;; Code: 31;;; Code:
32 32
@@ -233,7 +233,7 @@ that want to create a mail buffer.
233Users should use `\\[mh-smail]' to compose mail." 233Users should use `\\[mh-smail]' to compose mail."
234 (mh-find-path) 234 (mh-find-path)
235 (let ((mh-error-if-no-draft t)) 235 (let ((mh-error-if-no-draft t))
236 (mh-send to "" subject))) 236 (mh-send (or to "") "" (or subject ""))))
237 237
238 238
239(defun mh-edit-again (msg) 239(defun mh-edit-again (msg)