mirror/emacs
1
0
Fork 0
mirror of https://git.savannah.gnu.org/git/emacs.git synced 2025-01-27 19:31:38 +00:00
Code Issues Releases Activity

Require sendmail.el.

Browse Source 
(sc-no-blank-line-or-header): Use mail-header-end.
This commit is contained in:
Richard M. Stallman 1998-04-30 06:11:39 +00:00
parent eed1360c12
commit 48ad09473a
1 changed files with 2 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
lisp/mail/supercite.el
View File

@ -36,6 +36,7 @@
(require 'regi)
(require 'sendmail) ;; For mail-header-end.
;; start user configuration variables
;; vvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvv
@ -1577,8 +1578,7 @@ non-nil."
(if (not (bobp))
(if (and (eolp)
(progn (forward-line -1)
(or (looking-at
(concat "^" (regexp-quote mail-header-separator) "$"))
(or (= (point) (mail-header-end))
(and (eq major-mode 'mh-letter-mode)
(mh-in-header-p)))))
(progn (forward-line)