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