diff options
| author | Richard M. Stallman <rms@gnu.org> | 1998-04-30 06:11:39 +0000 |
|---|---|---|
| committer | Richard M. Stallman <rms@gnu.org> | 1998-04-30 06:11:39 +0000 |
| commit | 48ad09473a8d2b4ec40ccd38153a60296a5745e1 (patch) | |
| tree | beeb004797e3829ec8337d9cc4e24a92d607e846 /lisp/mail/supercite.el | |
| parent | eed1360c124fb6cb11e9e0df771ed86a6883ad27 (diff) | |
| download | emacs-48ad09473a8d2b4ec40ccd38153a60296a5745e1.tar.gz emacs-48ad09473a8d2b4ec40ccd38153a60296a5745e1.tar.bz2 emacs-48ad09473a8d2b4ec40ccd38153a60296a5745e1.zip | |
Require sendmail.el.
(sc-no-blank-line-or-header): Use mail-header-end.
Diffstat (limited to 'lisp/mail/supercite.el')
| -rw-r--r-- | lisp/mail/supercite.el | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/lisp/mail/supercite.el b/lisp/mail/supercite.el index 00b4c55627a..3039dd6989c 100644 --- a/lisp/mail/supercite.el +++ b/lisp/mail/supercite.el @@ -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) |