From 1498db1830b6e9f1c98c7e117aa2de5354f463d5 Mon Sep 17 00:00:00 2001 From: Karl Heuer Date: Thu, 4 Jan 1996 23:10:07 +0000 Subject: [PATCH] (sendmail-sync-aliases): Renamed from sendmail-synch-aliases. --- lisp/mail/sendmail.el | 6 +++--- 1 file changed, 3 insertions(+), 3 deletions(-) diff --git a/lisp/mail/sendmail.el b/lisp/mail/sendmail.el index 1c3b2dbc150..29bac3a16c9 100644 --- a/lisp/mail/sendmail.el +++ b/lisp/mail/sendmail.el @@ -226,7 +226,7 @@ actually occur.") (defvar mail-send-hook nil "Normal hook run before sending mail, in Mail mode.") -(defun sendmail-synch-aliases () +(defun sendmail-sync-aliases () (let ((modtime (nth 5 (file-attributes mail-personal-alias-file)))) (or (equal mail-alias-modtime modtime) (setq mail-alias-modtime modtime @@ -235,7 +235,7 @@ actually occur.") (defun mail-setup (to subject in-reply-to cc replybuffer actions) (or mail-default-reply-to (setq mail-default-reply-to (getenv "REPLYTO"))) - (sendmail-synch-aliases) + (sendmail-sync-aliases) (if (eq mail-aliases t) (progn (setq mail-aliases nil) @@ -495,7 +495,7 @@ the user from the mailer." (replace-match "\n") (backward-char 1) (setq delimline (point-marker)) - (sendmail-synch-aliases) + (sendmail-sync-aliases) (if mail-aliases (expand-mail-aliases (point-min) delimline)) (goto-char (point-min)) -- 2.39.2