2 (setq preloaded-file-list
4 "backquote" ; needed for defsubst etc.
5 "bytecomp-runtime" ; define defsubst
7 "packages" ; Bootstrap run-time lisp environment
10 "subr" ; load the most basic Lisp functions
11 "replace" ; match-string used in version.el.
12 ; Ignore compiled-by-mistake version.elc
18 "custom" ; Before the world so everything can be
20 "cus-start" ; for customization of builtin variables
28 "faces" ; must be loaded before any make-face call
29 ;;(pureload "facemenu") #### not yet ported
35 "process" ;; This is bad. network-streams may not be defined.
36 (when-feature multicast "multicast") ; #+network-streams implicitly true
37 "frame" ; move up here cause some stuff needs it here
40 "keydefs" ; Before loaddefs so that keymap vars exist.
45 "modeline" ; needs simple.el to be loaded first
46 ;; If SparcWorks support is included some additional packages are
47 ;; dumped which would normally have autoloads. To avoid
48 ;; duplicate doc string warnings, SparcWorks uses a separate
49 ;; autoloads file with the dumped packages removed.
50 ;; After fixing, eos/loaddefs-eos and loaddefs appear identical?!!
51 ;; So just make loaddefs-eos go away...
52 ;;(pureload (if (featurep 'sparcworks) "eos/loaddefs-eos" "loaddefs"))
54 "startup" ; For initialization of
55 ; `emacs-user-extension-dir'
57 ;; (pureload "profile")
58 (unless-feature mule "help-nomule")
60 ;; (pureload "hyper-apropos") Soon...
61 (unless-feature file-coding "files-nomule")
72 "paths.el" ; don't get confused if paths compiled.
76 "iso8859-1" ; This must be before any modes
77 ; (sets standard syntax table.)
79 "easymenu" ; Added for 20.3.
83 "auto-save" ; Added for 20.4
84 "movemail" ; Added for 21.2
85 (when-feature windows-nt "win32-native")
86 (when-feature lisp-float-type "float-sup")
87 "itimer" ; for vars auto-save-timeout and
92 ;;;;;;;;;;;;;;;;;; GUI support
93 (when-feature window-system "gui")
94 (when-feature window-system "mouse")
95 (when-feature window-system "mode-motion")
96 (when-feature toolbar "toolbar")
97 (when-feature scrollbar "scrollbar")
98 (when-feature menubar "menubar")
99 (when-feature dialog "dialog")
100 (when-feature gutter "gutter")
101 (when-feature dragdrop-api "dragdrop")
104 ;;;;;;;;;;;;;;;;;; Content for GUI's
105 ;; There used to be window-system inserted in the when-feature,
106 ;; but IMHO your configure script should turn off the menubar,
107 ;; toolbar, etc. features when there is no window system. We
108 ;; should just be able to assume that, if (featurep 'menubar),
109 ;; the menubar should work and if items are added, they can be
110 ;; seen clearly and usefully.
111 (when-feature (and (not infodock) menubar) "menubar-items")
112 (when-feature (and gutter) "gutter-items")
113 (when-feature (and (not infodock) toolbar) "toolbar-items")
114 (when-feature (and (not infodock) dialog) "dialog-items")
116 ;;;;;;;;;;;;;;;;;; Coding-system support
117 (when-feature file-coding "coding")
118 (when-feature file-coding "code-files")
119 ;; Handle process with encoding/decoding coding-system.
120 (when-feature file-coding "code-process")
121 ;; Provide basic commands to set coding systems to user
122 (when-feature file-coding "code-cmds")
123 ;;;;;;;;;;;;;;;;;; MULE support
124 (when-feature mule "mule-conf")
125 (when-feature mule "arabic")
126 (when-feature utf-2000 "mojikyo-ccs")
127 (when-feature utf-2000 "isolated-char")
128 (when-feature utf-2000 "u00000-C0")
129 (when-feature utf-2000 "u00020-Basic-Latin")
130 (when-feature utf-2000 "u00080-C1")
131 (when-feature utf-2000 "u000A0-Latin-1-Supplement")
132 (when-feature utf-2000 "u00100-Latin-Extended-A")
133 (when-feature utf-2000 "u00180-Latin-Extended-B")
134 (when-feature utf-2000 "u00250-IPA-Extensions")
135 (when-feature utf-2000 "u002B0-Spacing-Modifier-Letters")
136 (when-feature utf-2000 "u00300-Combining-Diacritical-Marks")
137 (when-feature utf-2000 "u00370-Greek")
138 (when-feature utf-2000 "u00400-Cyrillic")
139 (when-feature utf-2000 "u00530-Armenian")
140 (when-feature utf-2000 "u00590-Hebrew")
141 (when-feature utf-2000 "u00600-Arabic")
142 (when-feature utf-2000 "u00700-Syriac")
143 (when-feature utf-2000 "u00780-Thaana")
144 (when-feature utf-2000 "u00900-Devanagari")
145 (when-feature utf-2000 "u00980-Bengali")
146 (when-feature utf-2000 "u00A00-Gurmukhi")
147 (when-feature utf-2000 "u00A80-Gujarati")
148 (when-feature utf-2000 "u00B00-Oriya")
149 (when-feature utf-2000 "u00B80-Tamil")
150 (when-feature utf-2000 "u00C00-Telugu")
151 (when-feature utf-2000 "u00C80-Kannada")
152 (when-feature utf-2000 "u00D00-Malayalam")
153 (when-feature utf-2000 "u00D80-Sinhala")
154 (when-feature utf-2000 "u00E00-Thai")
155 (when-feature utf-2000 "u00E80-Lao")
156 (when-feature utf-2000 "u00F00-Tibetan")
157 (when-feature utf-2000 "u01000-Myanmar")
158 (when-feature utf-2000 "u010A0-Georgian")
159 (when-feature utf-2000 "u01100-Hangul-Jamo")
160 (when-feature utf-2000 "u01200-Ethiopic")
161 (when-feature utf-2000 "u013A0-Cherokee")
162 (when-feature utf-2000 "u01400-Canadian")
163 (when-feature utf-2000 "u01680-Ogham")
164 (when-feature utf-2000 "u016A0-Runic")
165 (when-feature utf-2000 "u01780-Khmer")
166 (when-feature utf-2000 "u01800-Mongolian")
167 (when-feature utf-2000 "u01E00-Latin-Extended-Additional")
168 (when-feature utf-2000 "u01F00-Greek-Extended")
169 (when-feature utf-2000 "u02000-General-Punctuation")
170 (when-feature utf-2000 "u02070-Superscripts")
171 (when-feature utf-2000 "u02080-Subscripts")
172 (when-feature utf-2000 "u020A0-Currency-Symbols")
173 (when-feature utf-2000
174 "u020D0-Combining-Diacritical-Marks-for-Symbols")
175 (when-feature utf-2000 "u02100-Letterlike-Symbols")
176 (when-feature utf-2000 "u02150-Number-Forms")
177 (when-feature utf-2000 "u02190-Arrows")
178 (when-feature utf-2000 "u02200-Mathematical-Operators")
179 (when-feature utf-2000 "u02300-Miscellaneous-Technical")
180 (when-feature utf-2000 "u02400-Control-Pictures")
181 (when-feature utf-2000 "u02440-OCR")
182 (when-feature utf-2000 "u02460-Enclosed-Alphanumerics")
183 (when-feature utf-2000 "u02500-Box-Drawing")
184 (when-feature utf-2000 "u02580-Block-Elements")
185 (when-feature utf-2000 "u025A0-Geometric-Shapes")
186 (when-feature utf-2000 "u02600-Miscellaneous-Symbols")
187 (when-feature utf-2000 "u02700-Dingbats")
188 (when-feature utf-2000 "u02800-Braille-Patterns")
189 (when-feature utf-2000 "u02E00-CJK-Radical-Supplement")
190 (when-feature utf-2000 "u02F00-Kangxi-Radicals")
191 (when-feature utf-2000 "u02FF0-Ideographic-Description-Characters")
192 (when-feature utf-2000 "u03000-CJK-Symbols-and-Punctuation")
193 (when-feature utf-2000 "u03040-Hiragana")
194 (when-feature utf-2000 "u030A0-Katakana")
195 (when-feature utf-2000 "u03100-Bopomofo")
196 (when-feature utf-2000 "u03130-Hangul-Compatibility-Jamo")
197 (when-feature utf-2000 "u03190-Kanbun")
198 (when-feature utf-2000 "u031A0-Bopomofo-Extended")
199 (when-feature utf-2000 "u03200-Enclosed-CJK-Letters-and-Months")
200 (when-feature utf-2000 "u03300-CJK-Compatibility")
201 (when-feature utf-2000 "Ideograph-R001-One")
202 (when-feature utf-2000 "Ideograph-R002-Line")
203 (when-feature utf-2000 "Ideograph-R003-Dot")
204 (when-feature utf-2000 "Ideograph-R004-Slash")
205 (when-feature utf-2000 "Ideograph-R005-Second")
206 (when-feature utf-2000 "Ideograph-R006-Hook")
207 (when-feature utf-2000 "Ideograph-R007-Two")
208 (when-feature utf-2000 "Ideograph-R008-Lid")
209 (when-feature utf-2000 "Ideograph-R009-Man")
210 (when-feature utf-2000 "Ideograph-R010-Legs")
211 (when-feature utf-2000 "Ideograph-R011-Enter")
212 (when-feature utf-2000 "Ideograph-R012-Eight")
213 (when-feature utf-2000 "Ideograph-R013-Down-Box")
214 (when-feature utf-2000 "Ideograph-R014-Cover")
215 (when-feature utf-2000 "Ideograph-R015-Ice")
216 (when-feature utf-2000 "Ideograph-R016-Table")
217 (when-feature utf-2000 "Ideograph-R017-Open-Box")
218 (when-feature utf-2000 "Ideograph-R018-Knife")
219 (when-feature utf-2000 "Ideograph-R019-Power")
220 (when-feature utf-2000 "Ideograph-R020-Wrap")
221 (when-feature utf-2000 "Ideograph-R021-Spoon")
222 (when-feature utf-2000 "Ideograph-R022-Right-Open-Box")
223 (when-feature utf-2000 "Ideograph-R023-Hiding-Enclosure")
224 (when-feature utf-2000 "Ideograph-R024-Ten")
225 (when-feature utf-2000 "Ideograph-R025-Divination")
226 (when-feature utf-2000 "Ideograph-R026-Seal")
227 (when-feature utf-2000 "Ideograph-R027-Cliff")
228 (when-feature utf-2000 "Ideograph-R028-Private")
229 (when-feature utf-2000 "Ideograph-R029-Again")
230 (when-feature utf-2000 "Ideograph-R030-Mouth")
231 (when-feature utf-2000 "Ideograph-R031-Enclosure")
232 (when-feature utf-2000 "Ideograph-R032-Earth")
233 (when-feature utf-2000 "Ideograph-R033-Scholar")
234 (when-feature utf-2000 "Ideograph-R034-Go")
235 (when-feature utf-2000 "Ideograph-R035-Go-Slowly")
236 (when-feature utf-2000 "Ideograph-R036-Evening")
237 (when-feature utf-2000 "Ideograph-R037-Big")
238 (when-feature utf-2000 "Ideograph-R038-Woman")
239 (when-feature utf-2000 "Ideograph-R039-Child")
240 (when-feature utf-2000 "Ideograph-R040-Roof")
241 (when-feature utf-2000 "Ideograph-R041-Inch")
242 (when-feature utf-2000 "Ideograph-R042-Small")
243 (when-feature utf-2000 "Ideograph-R043-Lame")
244 (when-feature utf-2000 "Ideograph-R044-Corpse")
245 (when-feature utf-2000 "Ideograph-R045-Sprout")
246 (when-feature utf-2000 "Ideograph-R046-Mountain")
247 (when-feature utf-2000 "Ideograph-R047-River")
248 (when-feature utf-2000 "Ideograph-R048-Work")
249 (when-feature utf-2000 "Ideograph-R049-Oneself")
250 (when-feature utf-2000 "Ideograph-R050-Turban")
251 (when-feature utf-2000 "Ideograph-R051-Dry")
252 (when-feature utf-2000 "Ideograph-R052-Short-Thread")
253 (when-feature utf-2000 "Ideograph-R053-Dotted-Cliff")
254 (when-feature utf-2000 "Ideograph-R054-Long-Stride")
255 (when-feature utf-2000 "Ideograph-R055-Two-Hands")
256 (when-feature utf-2000 "Ideograph-R056-Shoot")
257 (when-feature utf-2000 "Ideograph-R057-Bow")
258 (when-feature utf-2000 "Ideograph-R058-Snout")
259 (when-feature utf-2000 "Ideograph-R059-Bristle")
260 (when-feature utf-2000 "Ideograph-R060-Step")
261 (when-feature utf-2000 "Ideograph-R061-Heart")
262 (when-feature utf-2000 "Ideograph-R062-Halberd")
263 (when-feature utf-2000 "Ideograph-R063-Door")
264 (when-feature utf-2000 "Ideograph-R064-Hand")
265 (when-feature utf-2000 "Ideograph-R065-Branch")
266 (when-feature utf-2000 "Ideograph-R066-Rap")
267 (when-feature utf-2000 "Ideograph-R067-Script")
268 (when-feature utf-2000 "Ideograph-R068-Dipper")
269 (when-feature utf-2000 "Ideograph-R069-Axe")
270 (when-feature utf-2000 "Ideograph-R070-Square")
271 (when-feature utf-2000 "Ideograph-R071-Not")
272 (when-feature utf-2000 "Ideograph-R072-Sun")
273 (when-feature utf-2000 "Ideograph-R073-Say")
274 (when-feature utf-2000 "Ideograph-R074-Moon")
275 (when-feature utf-2000 "Ideograph-R075-Tree")
276 (when-feature utf-2000 "Ideograph-R076-Lack")
277 (when-feature utf-2000 "Ideograph-R077-Stop")
278 (when-feature utf-2000 "Ideograph-R078-Death")
279 (when-feature utf-2000 "Ideograph-R079-Weapon")
280 (when-feature utf-2000 "Ideograph-R080-Do-Not")
281 (when-feature utf-2000 "Ideograph-R081-Compare")
282 (when-feature utf-2000 "Ideograph-R082-Fur")
283 (when-feature utf-2000 "Ideograph-R083-Clan")
284 (when-feature utf-2000 "Ideograph-R084-Steam")
285 (when-feature utf-2000 "Ideograph-R085-Water")
286 (when-feature utf-2000 "Ideograph-R086-Fire")
287 (when-feature utf-2000 "Ideograph-R087-Claw")
288 (when-feature utf-2000 "Ideograph-R088-Father")
289 (when-feature utf-2000 "Ideograph-R089-Double-X")
290 (when-feature utf-2000 "Ideograph-R090-Half-Tree-Trunk")
291 (when-feature utf-2000 "Ideograph-R091-Slice")
292 (when-feature utf-2000 "Ideograph-R092-Fang")
293 (when-feature utf-2000 "Ideograph-R093-Cow")
294 (when-feature utf-2000 "Ideograph-R094-Dog")
295 (when-feature utf-2000 "Ideograph-R095-Profound")
296 (when-feature utf-2000 "Ideograph-R096-Jade")
297 (when-feature utf-2000 "Ideograph-R097-Melon")
298 (when-feature utf-2000 "Ideograph-R098-Tile")
299 (when-feature utf-2000 "Ideograph-R099-Sweet")
300 (when-feature utf-2000 "Ideograph-R100-Life")
301 (when-feature utf-2000 "Ideograph-R101-Use")
302 (when-feature utf-2000 "Ideograph-R102-Field")
303 (when-feature utf-2000 "Ideograph-R103-Bolt-Of-Cloth")
304 (when-feature utf-2000 "Ideograph-R104-Sickness")
305 (when-feature utf-2000 "Ideograph-R105-Dotted-Tent")
306 (when-feature utf-2000 "Ideograph-R106-White")
307 (when-feature utf-2000 "Ideograph-R107-Skin")
308 (when-feature utf-2000 "Ideograph-R108-Dish")
309 (when-feature utf-2000 "Ideograph-R109-Eye")
310 (when-feature utf-2000 "Ideograph-R110-Spear")
311 (when-feature utf-2000 "Ideograph-R111-Arrow")
312 (when-feature utf-2000 "Ideograph-R112-Stone")
313 (when-feature utf-2000 "Ideograph-R113-Spirit")
314 (when-feature utf-2000 "Ideograph-R114-Track")
315 (when-feature utf-2000 "Ideograph-R115-Grain")
316 (when-feature utf-2000 "Ideograph-R116-Cave")
317 (when-feature utf-2000 "Ideograph-R117-Stand")
318 (when-feature utf-2000 "Ideograph-R118-Bamboo")
319 (when-feature utf-2000 "Ideograph-R119-Rice")
320 (when-feature utf-2000 "Ideograph-R120-Silk")
321 (when-feature utf-2000 "Ideograph-R121-Jar")
322 (when-feature utf-2000 "Ideograph-R122-Net")
323 (when-feature utf-2000 "Ideograph-R123-Sheep")
324 (when-feature utf-2000 "Ideograph-R124-Feather")
325 (when-feature utf-2000 "Ideograph-R125-Old")
326 (when-feature utf-2000 "Ideograph-R126-And")
327 (when-feature utf-2000 "Ideograph-R127-Plow")
328 (when-feature utf-2000 "Ideograph-R128-Ear")
329 (when-feature utf-2000 "Ideograph-R129-Brush")
330 (when-feature utf-2000 "Ideograph-R130-Meat")
331 (when-feature utf-2000 "Ideograph-R131-Minister")
332 (when-feature utf-2000 "Ideograph-R132-Self")
333 (when-feature utf-2000 "Ideograph-R133-Arrive")
334 (when-feature utf-2000 "Ideograph-R134-Mortar")
335 (when-feature utf-2000 "Ideograph-R135-Tongue")
336 (when-feature utf-2000 "Ideograph-R136-Oppose")
337 (when-feature utf-2000 "Ideograph-R137-Boat")
338 (when-feature utf-2000 "Ideograph-R138-Stopping")
339 (when-feature utf-2000 "Ideograph-R139-Color")
340 (when-feature utf-2000 "Ideograph-R140-Grass")
341 (when-feature utf-2000 "Ideograph-R141-Tiger")
342 (when-feature utf-2000 "Ideograph-R142-Insect")
343 (when-feature utf-2000 "Ideograph-R143-Blood")
344 (when-feature utf-2000 "Ideograph-R144-Walk-Enclosure")
345 (when-feature utf-2000 "Ideograph-R145-Clothes")
346 (when-feature utf-2000 "Ideograph-R146-West")
347 (when-feature utf-2000 "Ideograph-R147-See")
348 (when-feature utf-2000 "Ideograph-R148-Horn")
349 (when-feature utf-2000 "Ideograph-R149-Speech")
350 (when-feature utf-2000 "Ideograph-R150-Valley")
351 (when-feature utf-2000 "Ideograph-R151-Bean")
352 (when-feature utf-2000 "Ideograph-R152-Pig")
353 (when-feature utf-2000 "Ideograph-R153-Badger")
354 (when-feature utf-2000 "Ideograph-R154-Shell")
355 (when-feature utf-2000 "Ideograph-R155-Red")
356 (when-feature utf-2000 "Ideograph-R156-Run")
357 (when-feature utf-2000 "Ideograph-R157-Foot")
358 (when-feature utf-2000 "Ideograph-R158-Body")
359 (when-feature utf-2000 "Ideograph-R159-Cart")
360 (when-feature utf-2000 "Ideograph-R160-Bitter")
361 (when-feature utf-2000 "Ideograph-R161-Morning")
362 (when-feature utf-2000 "Ideograph-R162-Walk")
363 (when-feature utf-2000 "Ideograph-R163-City")
364 (when-feature utf-2000 "Ideograph-R164-Wine")
365 (when-feature utf-2000 "Ideograph-R165-Distinguish")
366 (when-feature utf-2000 "Ideograph-R166-Village")
367 (when-feature utf-2000 "Ideograph-R167-Gold")
368 (when-feature utf-2000 "Ideograph-R168-Long")
369 (when-feature utf-2000 "Ideograph-R169-Gate")
370 (when-feature utf-2000 "Ideograph-R170-Mound")
371 (when-feature utf-2000 "Ideograph-R171-Slave")
372 (when-feature utf-2000 "Ideograph-R172-Short-Tailed-Bird")
373 (when-feature utf-2000 "Ideograph-R173-Rain")
374 (when-feature utf-2000 "Ideograph-R174-Blue")
375 (when-feature utf-2000 "Ideograph-R175-Wrong")
376 (when-feature utf-2000 "Ideograph-R176-Face")
377 (when-feature utf-2000 "Ideograph-R177-Leather")
378 (when-feature utf-2000 "Ideograph-R178-Tanned-Leather")
379 (when-feature utf-2000 "Ideograph-R179-Leek")
380 (when-feature utf-2000 "Ideograph-R180-Sound")
381 (when-feature utf-2000 "Ideograph-R181-Leaf")
382 (when-feature utf-2000 "Ideograph-R182-Wind")
383 (when-feature utf-2000 "Ideograph-R183-Fly")
384 (when-feature utf-2000 "Ideograph-R184-Eat")
385 (when-feature utf-2000 "Ideograph-R185-Head")
386 (when-feature utf-2000 "Ideograph-R186-Fragrant")
387 (when-feature utf-2000 "Ideograph-R187-Horse")
388 (when-feature utf-2000 "Ideograph-R188-Bone")
389 (when-feature utf-2000 "Ideograph-R189-Tall")
390 (when-feature utf-2000 "Ideograph-R190-Hair")
391 (when-feature utf-2000 "Ideograph-R191-Fight")
392 (when-feature utf-2000 "Ideograph-R192-Sacrificial-Wine")
393 (when-feature utf-2000 "Ideograph-R193-Cauldron")
394 (when-feature utf-2000 "Ideograph-R194-Ghost")
395 (when-feature utf-2000 "Ideograph-R195-Fish")
396 (when-feature utf-2000 "Ideograph-R196-Bird")
397 (when-feature utf-2000 "Ideograph-R197-Salt")
398 (when-feature utf-2000 "Ideograph-R198-Deer")
399 (when-feature utf-2000 "Ideograph-R199-Wheat")
400 (when-feature utf-2000 "Ideograph-R200-Hemp")
401 (when-feature utf-2000 "Ideograph-R201-Yellow")
402 (when-feature utf-2000 "Ideograph-R202-Millet")
403 (when-feature utf-2000 "Ideograph-R203-Black")
404 (when-feature utf-2000 "Ideograph-R204-Embroidery")
405 (when-feature utf-2000 "Ideograph-R205-Frog")
406 (when-feature utf-2000 "Ideograph-R206-Tripod")
407 (when-feature utf-2000 "Ideograph-R207-Drum")
408 (when-feature utf-2000 "Ideograph-R208-Rat")
409 (when-feature utf-2000 "Ideograph-R209-Nose")
410 (when-feature utf-2000 "Ideograph-R210-Even")
411 (when-feature utf-2000 "Ideograph-R211-Tooth")
412 (when-feature utf-2000 "Ideograph-R212-Dragon")
413 (when-feature utf-2000 "Ideograph-R213-Turtle")
414 (when-feature utf-2000 "Ideograph-R214-Flute")
415 (when-feature utf-2000 "u0A000-Yi-Syllables")
416 (when-feature utf-2000 "u0AC00-Hangul-Syllables")
417 (when-feature utf-2000 "u0E000-Private-Use")
418 (when-feature utf-2000 "u0FB00-Alphabetic-Presentation-Forms")
419 (when-feature utf-2000 "u0FB50-Arabic-Presentation-Forms-A")
420 (when-feature utf-2000 "u0FE20-Combining-Half-Marks")
421 (when-feature utf-2000 "u0FE30-CJK-Compatibility-Forms")
422 (when-feature utf-2000 "u0FE50-Small-Form-Variants")
423 (when-feature utf-2000 "u0FE70-Arabic-Presentation-Forms-B")
424 (when-feature utf-2000 "u0FF00-Halfwidth-and-Fullwidth-Forms")
425 (when-feature utf-2000 "u0FFF0-Specials")
426 (when-feature utf-2000 "ad-hoc-cdp")
427 (when-feature utf-2000 "ccs-tcvn5712.el")
428 (when-feature mule "mule-charset")
429 (when-feature utf-2000 "mojikyo-conf")
430 (when-feature mule "mule-coding")
431 ;; All files after this can have extended characters in them.
432 (when-feature mule "mule-help")
433 (when-feature mule "mule-category")
434 (when-feature mule "mule-ccl")
435 (when-feature mule "mule-misc")
436 (when-feature mule "kinsoku")
437 (when-feature (and mule x) "mule-x-init")
438 (when-feature (and mule tty) "mule-tty-init")
439 (when-feature mule "mule-cmds") ; to sync with Emacs 20.1
441 ;; after this goes the specific lisp routines for a particular input system
442 ;; 97.2.5 JHod Shouldn't these go into a site-load file to allow site
443 ;; or user switching of input systems???
447 ; (pureload "egg-wnn")
448 ; (setq egg-default-startup-file "eggrc-wnn")))
450 ;; (if (and (boundp 'CANNA) CANNA)
451 ;; (pureload "canna")
454 ;; Now load files to set up all the different languages/environments
455 ;; that Mule knows about.
457 (when-feature mule "chinese")
458 (when-feature mule "mule/cyrillic") ; overloaded in leim/quail
459 (when-feature mule "english")
460 (when-feature mule "ethiopic")
461 (when-feature mule "european")
462 (when-feature mule "mule/greek") ; overloaded in leim/quail
463 (when-feature mule "hebrew")
464 (when-feature mule "japanese")
465 (when-feature mule "korean")
466 (when-feature mule "misc-lang")
467 (when-feature mule "thai-xtis-chars")
468 (when-feature mule "mule/thai-xtis") ; overloaded in leim/quail
469 (when-feature mule "viet-chars")
470 (when-feature (and mule (not utf-2000)) "viet-ccl")
471 (when-feature mule "vietnamese")
473 ;; Specialized language support
474 (when-feature (and mule CANNA) "canna-leim")
475 ;; Egg/Its is now a package
476 ; (when-feature (and mule wnn) "egg-leim")
477 ; (when-feature (and mule wnn) "egg-kwnn-leim")
478 ; (when-feature (and mule wnn) "egg-cwnn-leim")
479 ; (when-feature mule "egg-sj3-leim")
480 ;; SKK is now a package
481 ; (when-feature mule "skk-leim")
483 ;; Set up the XEmacs environment for Mule.
484 ;; Assumes the existence of various stuff above.
485 (when-feature mule "mule-init")
487 ;; Enable Mule capability for Gnus, mail, etc...
488 ;; Moved to sunpro-load.el - the default only for Sun.
489 ;;(pureload "mime-setup")
490 ;;; mule-load.el ends here
492 ;; preload InfoDock stuff. should almost certainly not be here if
493 ;; id-menus is not here. infodock needs to figure out a clever way to
494 ;; advise this stuff or we need to export a clean way for infodock or
495 ;; others to control this programmatically.
496 (when-feature (and infodock (or x mswindows) menubar) "id-menus")
497 ;; preload the X code.
498 (when-feature x "x-faces")
499 (when-feature x "x-iso8859-1")
500 (when-feature x "x-mouse")
501 (when-feature x "x-select")
502 (when-feature (and x scrollbar) "x-scrollbar")
503 (when-feature x "x-misc")
504 (when-feature x "x-init")
505 (when-feature x "x-win-xfree86")
506 (when-feature x "x-win-sun")
507 ;; preload the mswindows code.
508 (when-feature mswindows "msw-glyphs")
509 (when-feature mswindows "msw-faces")
510 (when-feature mswindows "msw-mouse")
511 (when-feature mswindows "msw-init")
512 (when-feature mswindows "msw-select")
513 ;; preload the TTY init code.
514 (when-feature tty "tty-init")
515 ;;; Formerly in tooltalk/tooltalk-load.el
516 ;; Moved to tooltalk package
517 ;; (when-feature tooltalk "tooltalk-macros")
518 ;; (when-feature tooltalk "tooltalk-util")
519 ;; (when-feature tooltalk "tooltalk-init")
520 ;; "vc-hooks" ; Packaged. Available in two versions.
521 ;; "ediff-hook" ; Packaged.
524 (when-feature ldap "ldap")
526 ;; (when-feature energize "energize/energize-load.el")
527 ;;; formerly in sunpro/sunpro-load.el
528 ;; (when-feature (and mule sparcworks) "mime-setup")
530 ;; Moved to Sun package
531 ;; (when-feature sparcworks "cc-mode") ; Requires cc-mode package
532 ;; (when-feature sparcworks "sunpro-init")
533 ;; (when-feature sparcworks "ring")
534 ;; (when-feature sparcworks "comint") ; Requires comint package
535 ;; (when-feature sparcworks "annotations")
537 ;;; formerly in eos/sun-eos-load.el
538 ;; (when-feature sparcworks "sun-eos-init")
539 ;; (when-feature sparcworks "sun-eos-common")
540 ;; (when-feature sparcworks "sun-eos-editor")
541 ;; (when-feature sparcworks "sun-eos-browser")
542 ;; (when-feature sparcworks "sun-eos-debugger")
543 ;; (when-feature sparcworks "sun-eos-debugger-extra")
544 ;; (when-feature sparcworks "sun-eos-menubar")
545 "loadhist" ; Must be dumped before loaddefs is loaded
546 "loaddefs" ; <=== autoloads get loaded here