comparison lisp/loadup.el @ 39650:85be22a1994b

("faces"): Move load before loading "loaddefs.el". ("button"): New load, just before "help" (which uses it).
author Miles Bader <miles@gnu.org>
date Sun, 07 Oct 2001 11:38:15 +0000
parents 253f761ad37b
children 05093dfba0b4
comparison
equal deleted inserted replaced
39649:7edeec63e660 39650:85be22a1994b
62 (load "bindings") 62 (load "bindings")
63 (setq load-source-file-function 'load-with-code-conversion) 63 (setq load-source-file-function 'load-with-code-conversion)
64 (load "simple") 64 (load "simple")
65 (load "files") 65 (load "files")
66 66
67 (load "faces") ; after here, `defface' may be used.
68
67 (message "Lists of integers (garbage collection statistics) are normal output") 69 (message "Lists of integers (garbage collection statistics) are normal output")
68 (message "while building Emacs; they do not indicate a problem.") 70 (message "while building Emacs; they do not indicate a problem.")
69 (message "%s" (garbage-collect)) 71 (message "%s" (garbage-collect))
70 (load "loaddefs.el") ;Don't get confused if someone compiled this by mistake. 72 (load "loaddefs.el") ;Don't get confused if someone compiled this by mistake.
71 (message "%s" (garbage-collect)) 73 (message "%s" (garbage-collect))
72 74
75 (load "button") ; used by help
76
73 (load "help") 77 (load "help")
78
74 ;; Any Emacs Lisp source file (*.el) loaded here after can contain 79 ;; Any Emacs Lisp source file (*.el) loaded here after can contain
75 ;; multilingual text. 80 ;; multilingual text.
76 (load "international/mule-cmds") 81 (load "international/mule-cmds")
77 (load "case-table") 82 (load "case-table")
78 (load "international/characters") 83 (load "international/characters")
110 115
111 (load "indent") 116 (load "indent")
112 (load "window") 117 (load "window")
113 (load "frame") 118 (load "frame")
114 (load "term/tty-colors") 119 (load "term/tty-colors")
115 (load "faces") 120
116 (if (fboundp 'frame-face-alist) 121 (if (fboundp 'frame-face-alist)
117 (progn 122 (progn
118 (load "facemenu"))) 123 (load "facemenu")))
119 (if (fboundp 'track-mouse) 124 (if (fboundp 'track-mouse)
120 (progn 125 (progn