aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
-rw-r--r--lisp/abbrev.el6
1 files changed, 3 insertions, 3 deletions
diff --git a/lisp/abbrev.el b/lisp/abbrev.el
index b0934c82bec..6a17b747a73 100644
--- a/lisp/abbrev.el
+++ b/lisp/abbrev.el
@@ -176,17 +176,17 @@ the ones defined from the buffer now."
176 "Read abbrev definitions from file written with `write-abbrev-file'. 176 "Read abbrev definitions from file written with `write-abbrev-file'.
177Optional argument FILE is the name of the file to read; 177Optional argument FILE is the name of the file to read;
178it defaults to the value of `abbrev-file-name'. 178it defaults to the value of `abbrev-file-name'.
179Optional second argument QUIETLY non-nil means don't print anything." 179Optional second argument QUIETLY non-nil means don't display a message."
180 (interactive "fRead abbrev file: ") 180 (interactive "fRead abbrev file: ")
181 (load (if (and file (> (length file) 0)) file abbrev-file-name) 181 (load (if (and file (> (length file) 0)) file abbrev-file-name)
182 nil quietly) 182 nil quietly)
183 (setq save-abbrevs t abbrevs-changed nil)) 183 (setq abbrevs-changed nil))
184 184
185(defun quietly-read-abbrev-file (&optional file) 185(defun quietly-read-abbrev-file (&optional file)
186 "Read abbrev definitions from file written with write-abbrev-file. 186 "Read abbrev definitions from file written with write-abbrev-file.
187Optional argument FILE is the name of the file to read; 187Optional argument FILE is the name of the file to read;
188it defaults to the value of `abbrev-file-name'. 188it defaults to the value of `abbrev-file-name'.
189Does not print anything." 189Does not display any message."
190 ;(interactive "fRead abbrev file: ") 190 ;(interactive "fRead abbrev file: ")
191 (read-abbrev-file file t)) 191 (read-abbrev-file file t))
192 192