|
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 "misc"
|
|
|
52 ;; (load-gc "profile")
|
|
207
|
53 #-mule "help-nomule"
|
|
169
|
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"
|
|
207
|
115 #+mule "mule-help"
|
|
163
|
116 ;; Load the remaining basic files.
|
|
169
|
117 #+mule "mule-category"
|
|
|
118 #+mule "mule-ccl"
|
|
|
119 #+mule "mule-misc"
|
|
|
120 #+mule "kinsoku"
|
|
|
121 #+(and mule x) "mule-x-init"
|
|
|
122 #+mule "mule-cmds" ; to sync with Emacs 20.1
|
|
163
|
123
|
|
|
124 ;; after this goes the specific lisp routines for a particular input system
|
|
|
125 ;; 97.2.5 JHod Shouldn't these go into a site-load file to allow site
|
|
|
126 ;; or user switching of input systems???
|
|
|
127 ;(if (featurep 'wnn)
|
|
|
128 ; (progn
|
|
|
129 ; (load-gc "egg")
|
|
|
130 ; (load-gc "egg-wnn")
|
|
|
131 ; (setq egg-default-startup-file "eggrc-wnn")))
|
|
|
132
|
|
|
133 ;; (if (and (boundp 'CANNA) CANNA)
|
|
|
134 ;; (load-gc "canna")
|
|
|
135 ;; )
|
|
|
136
|
|
|
137 ;; Now load files to set up all the different languages/environments
|
|
|
138 ;; that Mule knows about.
|
|
|
139
|
|
169
|
140 #+mule "language/arabic"
|
|
|
141 #+mule "language/chinese"
|
|
|
142 #+mule "language/cyrillic"
|
|
|
143 #+mule "language/english"
|
|
207
|
144 ;; #+mule "language/ethiopic"
|
|
169
|
145 #+mule "language/european"
|
|
|
146 #+mule "language/greek"
|
|
207
|
147 #+mule "language/hebrew"
|
|
169
|
148 #+mule "language/japanese"
|
|
|
149 #+mule "language/korean"
|
|
|
150 #+mule "language/misc-lang"
|
|
207
|
151 ;; #+mule "language/thai"
|
|
|
152 #+mule "language/viet-chars"
|
|
|
153 #+mule "language/vietnamese"
|
|
|
154
|
|
|
155 ;; Specialized language support
|
|
|
156 #+(and mule CANNA) "canna-leim"
|
|
|
157 #+(and mule wnn) "egg-leim"
|
|
163
|
158
|
|
|
159 ;; Set up the XEmacs environment for Mule.
|
|
|
160 ;; Assumes the existence of various stuff above.
|
|
169
|
161 #+mule "mule-init"
|
|
163
|
162
|
|
|
163 ;; Enable Mule capability for Gnus, mail, etc...
|
|
|
164 ;; Moved to sunpro-load.el - the default only for Sun.
|
|
|
165 ;;(load-gc "mime-setup")
|
|
|
166 ;;; mule-load.el ends here
|
|
169
|
167 #+window-system "gui"
|
|
|
168 #+window-system "mode-motion"
|
|
|
169 #+window-system "mouse"
|
|
163
|
170 ;; preload the X code, for faster startup.
|
|
169
|
171 #+(and x menubar) "x-menubar"
|
|
|
172 #+x "x-faces"
|
|
|
173 #+x "x-iso8859-1"
|
|
|
174 #+x "x-mouse"
|
|
|
175 #+x "x-select"
|
|
|
176 #+(and x scrollbar) "x-scrollbar"
|
|
|
177 #+x "x-misc"
|
|
|
178 #+x "x-init"
|
|
|
179 #+(and x toolbar) "x-toolbar"
|
|
163
|
180 ;; preload the TTY init code.
|
|
169
|
181 #+tty "tty-init"
|
|
163
|
182 ;;; Formerly in tooltalk/tooltalk-load.el
|
|
169
|
183 #+tooltalk "tooltalk/tooltalk-macros"
|
|
|
184 #+tooltalk "tooltalk/tooltalk-util"
|
|
|
185 #+tooltalk "tooltalk/tooltalk-init"
|
|
201
|
186 ;; "vc-hooks" ; Packaged. Available in two versions.
|
|
207
|
187 ;; "ediff-hook" ; Packaged.
|
|
169
|
188 "fontl-hooks"
|
|
|
189 "auto-show"
|
|
163
|
190 ;; #+energize "energize/energize-load.el"
|
|
|
191 ;;; formerly in sunpro/sunpro-load.el
|
|
187
|
192 ;; #+(and mule sparcworks) "mime-setup"
|
|
169
|
193 #+sparcworks "cc-mode"
|
|
|
194 #+sparcworks "sunpro-init"
|
|
|
195 #+sparcworks "ring"
|
|
|
196 #+sparcworks "comint"
|
|
|
197 #+sparcworks "annotations"
|
|
163
|
198 ;;; formerly in eos/sun-eos-load.el
|
|
187
|
199 ;; #+sparcworks "sun-eos-init"
|
|
|
200 ;; #+sparcworks "sun-eos-common"
|
|
|
201 ;; #+sparcworks "sun-eos-editor"
|
|
|
202 ;; #+sparcworks "sun-eos-browser"
|
|
|
203 ;; #+sparcworks "sun-eos-debugger"
|
|
|
204 ;; #+sparcworks "sun-eos-debugger-extra"
|
|
|
205 ;; #+sparcworks "sun-eos-menubar"
|
|
201
|
206 "loaddefs" ; <=== autoloads get loaded here
|
|
163
|
207 ))
|
