diff options
author | Karl Heuer <[email protected]> | 1994-09-22 17:00:25 +0000 |
---|---|---|
committer | Karl Heuer <[email protected]> | 1994-09-22 17:00:25 +0000 |
commit | 26045a35d2013473f968529085b59a19697fbc68 (patch) | |
tree | 2110cbda4abbf2da67857c4c4ace8fc27562edea /lisp/mail | |
parent | 799ac634aadd4c9279e26c5cebe52d8bebafbe21 (diff) |
(sendmail-synch-aliases): Renamed from sync-mail-aliases. All callers changed.
Diffstat (limited to 'lisp/mail')
-rw-r--r-- | lisp/mail/sendmail.el | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/lisp/mail/sendmail.el b/lisp/mail/sendmail.el index 952724892b..86101386ee 100644 --- a/lisp/mail/sendmail.el +++ b/lisp/mail/sendmail.el @@ -167,7 +167,7 @@ actually occur.") (defvar mail-send-hook nil "Normal hook run before sending mail, in Mail mode.") -(defun synch-mail-aliases () +(defun sendmail-synch-aliases () (let ((modtime (nth 5 (file-attributes "~/.mailrc")))) (or (equal mail-alias-modtime modtime) (setq mail-alias-modtime modtime @@ -176,7 +176,7 @@ actually occur.") (defun mail-setup (to subject in-reply-to cc replybuffer actions) (if (eq mail-default-reply-to t) (setq mail-default-reply-to (getenv "REPLYTO"))) - (synch-mail-aliases) + (sendmail-synch-aliases) (if (eq mail-aliases t) (progn (setq mail-aliases nil) @@ -421,7 +421,7 @@ the user from the mailer." (replace-match "\n") (backward-char 1) (setq delimline (point-marker)) - (synch-mail-aliases) + (sendmail-synch-aliases) (if mail-aliases (expand-mail-aliases (point-min) delimline)) (goto-char (point-min)) |