From 651fca74e4499539c76898a9e2b6109047c404a7 Mon Sep 17 00:00:00 2001 From: "Richard M. Stallman" Date: Fri, 17 Jun 1994 16:03:59 +0000 Subject: [PATCH] (build-mail-abbrevs): Pass a recursivep argument in recursive call. --- lisp/mail/mailabbrev.el | 3 ++- 1 file changed, 2 insertions(+), 1 deletion(-) diff --git a/lisp/mail/mailabbrev.el b/lisp/mail/mailabbrev.el index b1657aad24e..ec7ba01b2a2 100644 --- a/lisp/mail/mailabbrev.el +++ b/lisp/mail/mailabbrev.el @@ -202,7 +202,8 @@ no aliases, which is represented by this being a table with no entries.)") (end-of-line) (build-mail-abbrevs (substitute-in-file-name - (buffer-substring (match-beginning 1) (match-end 1))))) + (buffer-substring (match-beginning 1) (match-end 1))) + t)) (re-search-forward "[ \t]+\\([^ \t\n]+\\)") (let* ((name (buffer-substring (match-beginning 1) (match-end 1))) -- 2.39.5