Mercurial > emacs
changeset 40906:fe298eabbb27
(command-line): Read standard abbrev
file (abbrev-file-name), if it exists.
| author | Richard M. Stallman <rms@gnu.org> |
|---|---|
| date | Sun, 11 Nov 2001 01:53:31 +0000 |
| parents | 6407171bcdde |
| children | f1ec73203c1a |
| files | lisp/startup.el |
| diffstat | 1 files changed, 5 insertions(+), 0 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/startup.el Sun Nov 11 01:52:15 2001 +0000 +++ b/lisp/startup.el Sun Nov 11 01:53:31 2001 +0000 @@ -949,6 +949,11 @@ (mapconcat 'prin1-to-string (cdr error) ", ")) (pop-to-buffer "*Messages*") (setq init-file-had-error t))))) + + ;; If the user has a file of abbrevs, read it. + (if (file-exists-p abbrev-file-name) + (quietly-read-abbrev-file abbrev-file-name)) + ;; If we can tell that the init file altered debug-on-error, ;; arrange to preserve the value that it set up. (or (eq debug-on-error debug-on-error-initial)