# HG changeset patch # User Richard M. Stallman # Date 850951676 0 # Node ID 55eedd7e16fb578be0d6a8ce764a917d3e7da35d # Parent 7b3bcbb9a8f5d137c8a48e410a11d9f25c4f7d11 (sendmail-user-agent): Avoid error for CONTINUE non-nil. diff -r 7b3bcbb9a8f5 -r 55eedd7e16fb lisp/simple.el --- a/lisp/simple.el Wed Dec 18 18:15:30 1996 +0000 +++ b/lisp/simple.el Wed Dec 18 23:27:56 1996 +0000 @@ -2886,6 +2886,7 @@ (let ((cc (cdr (assoc-ignore-case "cc" other-headers))) (in-reply-to (cdr (assoc-ignore-case "in-reply-to" other-headers)))) (or (mail continue to subject in-reply-to cc yank-action send-actions) + continue (error "Message aborted")))) 'mail-send-and-exit)