Mercurial > emacs

changeset 9004:a253156d96b5

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
(sendmail-synch-aliases): Renamed from sync-mail-aliases. All callers changed.
author Karl Heuer <kwzh@gnu.org>
date Thu, 22 Sep 1994 17:00:25 +0000
parents bfe446409b77
children e7fa0346e8f8
files lisp/mail/sendmail.el
diffstat 1 files changed, 3 insertions(+), 3 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/mail/sendmail.el	Thu Sep 22 12:10:16 1994 +0000
+++ b/lisp/mail/sendmail.el	Thu Sep 22 17:00:25 1994 +0000
@@ -167,7 +167,7 @@
 (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 @@
 (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 @@
 	  (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))