mirrors/emacs
1
Fork 0
mirror of git://git.sv.gnu.org/emacs.git synced 2025-12-15 10:30:25 -08:00
Code Issues Projects Releases Wiki 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
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)