# HG changeset patch
# User Richard M. Stallman <rms@gnu.org>
# Date 1005443611 0
# Node ID fe298eabbb27e277fbc82dc34af90277eb410355
# Parent  6407171bcdde9c507d8eba3597e55c856f916b94
(command-line): Read standard abbrev
file (abbrev-file-name), if it exists.

diff -r 6407171bcdde -r fe298eabbb27 lisp/startup.el
--- 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)