Mercurial > emacs
changeset 70102:2ae2af972533
(read-abbrev-file): Use abbrev-file-name if optional
file is nil.
| author | Reiner Steib <Reiner.Steib@gmx.de> |
|---|---|
| date | Tue, 18 Apr 2006 22:04:27 +0000 |
| parents | ceac9912f828 |
| children | 4f0bc9ecc2a6 |
| files | lisp/ChangeLog lisp/abbrev.el |
| diffstat | 2 files changed, 6 insertions(+), 1 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/ChangeLog Tue Apr 18 21:29:03 2006 +0000 +++ b/lisp/ChangeLog Tue Apr 18 22:04:27 2006 +0000 @@ -1,3 +1,8 @@ +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> * tooltip.el (tooltip-mode, tooltip-use-echo-area): Doc fixes.
--- a/lisp/abbrev.el Tue Apr 18 21:29:03 2006 +0000 +++ b/lisp/abbrev.el Tue Apr 18 22:04:27 2006 +0000 @@ -202,7 +202,7 @@ (read-file-name (format "Read abbrev file (default %s): " abbrev-file-name) nil abbrev-file-name t))) - (load file nil quietly) + (load (or file abbrev-file-name) nil quietly) (setq abbrevs-changed nil)) (defun quietly-read-abbrev-file (&optional file)