Commit ec7793c3 authored by Reiner Steib's avatar Reiner Steib
Browse files

(read-abbrev-file): Use abbrev-file-name if optional

file is nil.
parent def27552
2006-04-19 Reiner Steib <Reiner.Steib@gmx.de>
* abbrev.el (read-abbrev-file): Use abbrev-file-name if optional
file is nil.
2006-04-18 Richard Stallman <rms@gnu.org> 2006-04-18 Richard Stallman <rms@gnu.org>
   
* tooltip.el (tooltip-mode, tooltip-use-echo-area): Doc fixes. * tooltip.el (tooltip-mode, tooltip-use-echo-area): Doc fixes.
......
...@@ -202,7 +202,7 @@ Optional second argument QUIETLY non-nil means don't display a message." ...@@ -202,7 +202,7 @@ Optional second argument QUIETLY non-nil means don't display a message."
(read-file-name (format "Read abbrev file (default %s): " (read-file-name (format "Read abbrev file (default %s): "
abbrev-file-name) abbrev-file-name)
nil abbrev-file-name t))) nil abbrev-file-name t)))
(load file nil quietly) (load (or file abbrev-file-name) nil quietly)
(setq abbrevs-changed nil)) (setq abbrevs-changed nil))
(defun quietly-read-abbrev-file (&optional file) (defun quietly-read-abbrev-file (&optional file)
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment