comparison lisp/mail/mh-comp.el @ 26393:d11cb5096a6c

(mh-smail-batch): If TO is nil, use "" as to-address.
author Gerd Moellmann <gerd@gnu.org>
date Wed, 10 Nov 1999 10:46:01 +0000
parents 2fe0f62fa349
children 192cbf5dbea2
comparison
equal deleted inserted replaced
26392:b3d3ff9a7a2c 26393:d11cb5096a6c
24 24
25 ;; Internal support for mh-e package. 25 ;; Internal support for mh-e package.
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
33 (provide 'mh-comp) 33 (provide 'mh-comp)
34 (require 'mh-utils) 34 (require 'mh-utils)
231 for any header fields, and thus is suitable for use by programs 231 for any header fields, and thus is suitable for use by programs
232 that want to create a mail buffer. 232 that want to create a mail buffer.
233 Users should use `\\[mh-smail]' to compose mail." 233 Users 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)
240 "Clean-up a draft or a message previously sent and make it resendable. 240 "Clean-up a draft or a message previously sent and make it resendable.
241 Default is the current message. 241 Default is the current message.