From baaddce7c0316132b8edbfabe0176186ec22b76a Mon Sep 17 00:00:00 2001 From: "Richard M. Stallman" Date: Fri, 26 Jun 1998 06:04:56 +0000 Subject: [PATCH] (mail-complete): Fix the test of (mail-heder-end). --- lisp/mail/mailalias.el | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/lisp/mail/mailalias.el b/lisp/mail/mailalias.el index 9d15345dd43..fec940c7254 100644 --- a/lisp/mail/mailalias.el +++ b/lisp/mail/mailalias.el @@ -379,7 +379,7 @@ current header, calls `mail-complete-function' and passes prefix arg if any." (if (file-exists-p mail-personal-alias-file) (build-mail-aliases)))) (let ((list mail-complete-alist)) - (if (and (> 0 (mail-header-end)) + (if (and (< 0 (mail-header-end)) (save-excursion (if (re-search-backward "^[^\t]" nil t) (while list -- 2.39.2