[Emacs-diffs] Changes to emacs/lisp/startup.el

[Richard M. Stallman]

Index: emacs/lisp/startup.el
diff -u emacs/lisp/startup.el:1.271 emacs/lisp/startup.el:1.272
--- emacs/lisp/startup.el:1.271 Sat Nov  3 13:09:33 2001
+++ emacs/lisp/startup.el       Sat Nov 10 20:53:31 2001
@@ -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)