|
189
|
1 (setq preloaded-file-list
|
|
169
|
2 '("backquote" ; needed for defsubst etc.
|
|
|
3 "bytecomp-runtime" ; define defsubst
|
|
177
|
4 "packages" ; Bootstrap run-time lisp environment
|
|
169
|
5 "subr" ; load the most basic Lisp functions
|
|
|
6 "replace" ; match-string used in version.el.
|
|
|
7 "version.el" ; Ignore compiled-by-mistake version.elc
|
|
|
8 "cl"
|
|
189
|
9 "cl-extra"
|
|
|
10 "cl-seq"
|
|
197
|
11 "cl/auto-autoloads" ; Prevents problems later
|
|
169
|
12 ;;"featurep"
|
|
|
13 "widget"
|
|
|
14 "custom" ; Before the world so everything can be
|
|
|
15 ; customized
|
|
|
16 "cus-start" ; for customization of builtin variables
|
|
|
17 "cmdloop"
|
|
|
18 ;; (or (fboundp 'recursive-edit) (load-gc "cmdloop1"))
|
|
|
19 "keymap"
|
|
|
20 "syntax"
|
|
|
21 "device"
|
|
|
22 "console"
|
|
|
23 "obsolete"
|
|
|
24 "specifier"
|
|
|
25 "faces" ; must be loaded before any make-face call
|
|
163
|
26 ;;(load-gc "facemenu") #### not yet ported
|
|
169
|
27 "glyphs"
|
|
|
28 "objects"
|
|
|
29 "extents"
|
|
|
30 "events"
|
|
|
31 "text-props"
|
|
|
32 "process"
|
|
|
33 "frame" ; move up here cause some stuff needs it here
|
|
|
34 "map-ynp"
|
|
|
35 "simple"
|
|
|
36 "keydefs" ; Before loaddefs so that keymap vars exist.
|
|
|
37 "abbrev"
|
|
|
38 "derived"
|
|
|
39 "minibuf"
|
|
|
40 "list-mode"
|
|
|
41 "modeline" ; needs simple.el to be loaded first
|
|
163
|
42 ;; If SparcWorks support is included some additional packages are
|
|
|
43 ;; dumped which would normally have autoloads. To avoid
|
|
|
44 ;; duplicate doc string warnings, SparcWorks uses a separate
|
|
|
45 ;; autoloads file with the dumped packages removed.
|
|
|
46 ;; After fixing, eos/loaddefs-eos and loaddefs appear identical?!!
|
|
|
47 ;; So just make loaddefs-eos go away...
|
|
|
48 ;;(load-gc (if (featurep 'sparcworks) "eos/loaddefs-eos" "loaddefs"))
|
|
173
|
49 "startup" ; For initialization of
|
|
|
50 ; `emacs-user-extension-dir'
|
|
169
|
51 "loaddefs" ; <=== autoloads get loaded here
|
|
|
52 "misc"
|
|
|
53 ;; (load-gc "profile")
|
|
|
54 "help"
|
|
|
55 ;; (load-gc "hyper-apropos") Soon...
|
|
|
56 #-mule "files-nomule"
|
|
|
57 "files"
|
|
|
58 "lib-complete"
|
|
|
59 "format"
|
|
|
60 "indent"
|
|
|
61 "isearch-mode"
|
|
|
62 "buffer"
|
|
|
63 "buff-menu"
|
|
|
64 "undo-stack"
|
|
|
65 "window"
|
|
|
66 "window-xemacs"
|
|
|
67 "paths.el" ; don't get confused if paths compiled.
|
|
|
68 "lisp"
|
|
|
69 "page"
|
|
|
70 "register"
|
|
|
71 "iso8859-1" ; This must be before any modes
|
|
|
72 ; (sets standard syntax table.)
|
|
|
73 "paragraphs"
|
|
|
74 "easymenu" ; Added for 20.3.
|
|
|
75 "lisp-mode"
|
|
|
76 "text-mode"
|
|
|
77 "fill"
|
|
|
78 ;; "cc-mode" ; as FSF goes so go we ..
|
|
|
79 ;; "scroll-in-place" ; We're not ready for this :-(
|
|
|
80 ;; we no longer load buff-menu automatically.
|
|
|
81 ;; it will get autoloaded if needed.
|
|
163
|
82
|
|
169
|
83 ;; Before this will work again, the different system types will need
|
|
|
84 ;; to have features named for them.
|
|
163
|
85
|
|
|
86 ; (cond ; Differences based on system-type
|
|
|
87 ; ((eq system-type 'vax-vms)
|
|
|
88 ; (load-gc "vmsproc")
|
|
|
89 ; (load-gc "vms-patch"))
|
|
|
90 ; ((eq system-type 'windows-nt)
|
|
|
91 ; ;; (load-gc "ls-lisp")
|
|
169
|
92 #+windows-nt "winnt"
|
|
163
|
93 ; ((eq system-type 'ms-dos)
|
|
|
94 ; ;; (load-gc "ls-lisp")
|
|
|
95 ; (load-gc "dos-fns")
|
|
|
96 ; (load-gc "disp-table"))) ; needed to setup ibm-pc char set,
|
|
|
97 ; see internal.el
|
|
169
|
98 #+lisp-float-type "float-sup"
|
|
|
99 "itimer" ; for vars auto-save-timeout and
|
|
|
100 ; auto-gc-threshold
|
|
|
101 "itimer-autosave"
|
|
|
102 #+toolbar "toolbar"
|
|
163
|
103 ; ;; else still define a few functions.
|
|
|
104 ; (defun toolbar-button-p (obj) "No toolbar support." nil)
|
|
|
105 ; (defun toolbar-specifier-p (obj) "No toolbar support." nil))
|
|
169
|
106 #+scrollbar "scrollbar"
|
|
|
107 #+menubar "menubar"
|
|
|
108 #+dialog "dialog"
|
|
|
109 #+mule "mule-charset"
|
|
|
110 #+mule "mule-coding"
|
|
163
|
111 ;; Handle I/O of files with extended characters.
|
|
169
|
112 #+mule "mule-files"
|
|
197
|
113 ;; Handle process with encoding/decoding non-ascii coding-system.
|
|
|
114 #+mule "mule-process"
|
|
163
|
115 ;; Load the remaining basic files.
|
|
169
|
116 #+mule "mule-category"
|
|
|
117 #+mule "mule-ccl"
|
|
|
118 #+mule "mule-misc"
|
|
|
119 #+mule "kinsoku"
|
|
|
120 #+(and mule x) "mule-x-init"
|
|
|
121 #+mule "mule-cmds" ; to sync with Emacs 20.1
|
|
163
|
122
|
|
|
123 ;; after this goes the specific lisp routines for a particular input system
|
|
|
124 ;; 97.2.5 JHod Shouldn't these go into a site-load file to allow site
|
|
|
125 ;; or user switching of input systems???
|
|
|
126 ;(if (featurep 'wnn)
|
|
|
127 ; (progn
|
|
|
128 ; (load-gc "egg")
|
|
|
129 ; (load-gc "egg-wnn")
|
|
|
130 ; (setq egg-default-startup-file "eggrc-wnn")))
|
|
|
131
|
|
|
132 ;; (if (and (boundp 'CANNA) CANNA)
|
|
|
133 ;; (load-gc "canna")
|
|
|
134 ;; )
|
|
|
135
|
|
|
136 ;; Now load files to set up all the different languages/environments
|
|
|
137 ;; that Mule knows about.
|
|
|
138
|
|
169
|
139 #+mule "language/arabic"
|
|
|
140 #+mule "language/chinese"
|
|
|
141 #+mule "language/cyrillic"
|
|
|
142 #+mule "language/english"
|
|
|
143 #+mule "language/ethiopic"
|
|
|
144 #+mule "language/european"
|
|
|
145 #+mule "language/greek"
|
|
|
146 #+mule "hebrew-hooks"
|
|
|
147 #+mule "language/japanese"
|
|
|
148 #+mule "language/korean"
|
|
|
149 #+mule "language/misc-lang"
|
|
|
150 #+mule "language/thai"
|
|
|
151 #+mule "vietnamese-hooks-1"
|
|
|
152 #+mule "vietnamese-hooks-2"
|
|
163
|
153
|
|
|
154 ;; Set up the XEmacs environment for Mule.
|
|
|
155 ;; Assumes the existence of various stuff above.
|
|
169
|
156 #+mule "mule-init"
|
|
163
|
157
|
|
|
158 ;; Enable Mule capability for Gnus, mail, etc...
|
|
|
159 ;; Moved to sunpro-load.el - the default only for Sun.
|
|
|
160 ;;(load-gc "mime-setup")
|
|
|
161 ;;; mule-load.el ends here
|
|
169
|
162 #+window-system "gui"
|
|
|
163 #+window-system "mode-motion"
|
|
|
164 #+window-system "mouse"
|
|
163
|
165 ;; preload the X code, for faster startup.
|
|
169
|
166 #+(and x menubar) "x-menubar"
|
|
|
167 #+x "x-faces"
|
|
|
168 #+x "x-iso8859-1"
|
|
|
169 #+x "x-mouse"
|
|
|
170 #+x "x-select"
|
|
|
171 #+(and x scrollbar) "x-scrollbar"
|
|
|
172 #+x "x-misc"
|
|
|
173 #+x "x-init"
|
|
|
174 #+(and x toolbar) "x-toolbar"
|
|
163
|
175 ;; preload the TTY init code.
|
|
169
|
176 #+tty "tty-init"
|
|
163
|
177 ;;; Formerly in tooltalk/tooltalk-load.el
|
|
169
|
178 #+tooltalk "tooltalk/tooltalk-macros"
|
|
|
179 #+tooltalk "tooltalk/tooltalk-util"
|
|
|
180 #+tooltalk "tooltalk/tooltalk-init"
|
|
|
181 "vc-hooks"
|
|
|
182 "ediff-hook"
|
|
|
183 "fontl-hooks"
|
|
|
184 "auto-show"
|
|
163
|
185 ;; #+energize "energize/energize-load.el"
|
|
|
186 ;;; formerly in sunpro/sunpro-load.el
|
|
187
|
187 ;; #+(and mule sparcworks) "mime-setup"
|
|
169
|
188 #+sparcworks "cc-mode"
|
|
|
189 #+sparcworks "sunpro-init"
|
|
|
190 #+sparcworks "ring"
|
|
|
191 #+sparcworks "comint"
|
|
|
192 #+sparcworks "annotations"
|
|
163
|
193 ;;; formerly in eos/sun-eos-load.el
|
|
187
|
194 ;; #+sparcworks "sun-eos-init"
|
|
|
195 ;; #+sparcworks "sun-eos-common"
|
|
|
196 ;; #+sparcworks "sun-eos-editor"
|
|
|
197 ;; #+sparcworks "sun-eos-browser"
|
|
|
198 ;; #+sparcworks "sun-eos-debugger"
|
|
|
199 ;; #+sparcworks "sun-eos-debugger-extra"
|
|
|
200 ;; #+sparcworks "sun-eos-menubar"
|
|
163
|
201 ))
|
