diff options
| -rw-r--r-- | lisp/startup.el | 5 |
1 files changed, 5 insertions, 0 deletions
diff --git a/lisp/startup.el b/lisp/startup.el index 4355d21ee51..c2bfe10396e 100644 --- a/lisp/startup.el +++ b/lisp/startup.el | |||
| @@ -949,6 +949,11 @@ or `CVS', and any subdirectory that contains a file named `.nosearch'." | |||
| 949 | (mapconcat 'prin1-to-string (cdr error) ", ")) | 949 | (mapconcat 'prin1-to-string (cdr error) ", ")) |
| 950 | (pop-to-buffer "*Messages*") | 950 | (pop-to-buffer "*Messages*") |
| 951 | (setq init-file-had-error t))))) | 951 | (setq init-file-had-error t))))) |
| 952 | |||
| 953 | ;; If the user has a file of abbrevs, read it. | ||
| 954 | (if (file-exists-p abbrev-file-name) | ||
| 955 | (quietly-read-abbrev-file abbrev-file-name)) | ||
| 956 | |||
| 952 | ;; If we can tell that the init file altered debug-on-error, | 957 | ;; If we can tell that the init file altered debug-on-error, |
| 953 | ;; arrange to preserve the value that it set up. | 958 | ;; arrange to preserve the value that it set up. |
| 954 | (or (eq debug-on-error debug-on-error-initial) | 959 | (or (eq debug-on-error debug-on-error-initial) |