# HG changeset patch # User Richard M. Stallman # Date 771869039 0 # Node ID 338a91733ff97bf79d3b979f3f2ea3427b56625e # Parent c0cc87942423bef09ff99dc70621aca4bebf8999 (build-mail-abbrevs): Pass a recursivep argument in recursive call. diff -r c0cc87942423 -r 338a91733ff9 lisp/mail/mailabbrev.el --- a/lisp/mail/mailabbrev.el Fri Jun 17 16:00:42 1994 +0000 +++ b/lisp/mail/mailabbrev.el Fri Jun 17 16:03:59 1994 +0000 @@ -202,7 +202,8 @@ (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)))