# HG changeset patch # User Richard M. Stallman # Date 1005443345 0 # Node ID 0f074a905ca2b512d2deed40a48e747fc1f26665 # Parent b84721a8fb602bbee231b87b7948aeec227bc944 (read-abbrev-file): Don't set save-abbrevs. (quietly-read-abbrev-file): Doc fix. diff -r b84721a8fb60 -r 0f074a905ca2 lisp/abbrev.el --- a/lisp/abbrev.el Sat Nov 10 23:19:54 2001 +0000 +++ b/lisp/abbrev.el Sun Nov 11 01:49:05 2001 +0000 @@ -176,17 +176,17 @@ "Read abbrev definitions from file written with `write-abbrev-file'. Optional argument FILE is the name of the file to read; it defaults to the value of `abbrev-file-name'. -Optional second argument QUIETLY non-nil means don't print anything." +Optional second argument QUIETLY non-nil means don't display a message." (interactive "fRead abbrev file: ") (load (if (and file (> (length file) 0)) file abbrev-file-name) nil quietly) - (setq save-abbrevs t abbrevs-changed nil)) + (setq abbrevs-changed nil)) (defun quietly-read-abbrev-file (&optional file) "Read abbrev definitions from file written with write-abbrev-file. Optional argument FILE is the name of the file to read; it defaults to the value of `abbrev-file-name'. -Does not print anything." +Does not display any message." ;(interactive "fRead abbrev file: ") (read-abbrev-file file t))