git.chise.org Git - chise/xemacs-chise.git-/blob - lisp/dumped-lisp.el

   1
   2 (setq preloaded-file-list
   3       (assemble-list
   4         "backquote"             ; needed for defsubst etc.
   5         "bytecomp-runtime"      ; define defsubst
   6         "find-paths"
   7         "packages"              ; Bootstrap run-time lisp environment
   8         "setup-paths"
   9         "dump-paths"
  10         "subr"                  ; load the most basic Lisp functions
  11         "replace"               ; match-string used in version.el.
  12         ; Ignore compiled-by-mistake version.elc
  13         "version.el"
  14         "cl"
  15         "cl-extra"
  16         "cl-seq"
  17         "widget"
  18         "custom"                ; Before the world so everything can be
  19                                 ; customized
  20         "cus-start"             ; for customization of builtin variables
  21         "cmdloop"
  22         "keymap"
  23         "syntax"
  24         "device"
  25         "console"
  26         "obsolete"
  27         "specifier"
  28         "faces"                 ; must be loaded before any make-face call
  29 ;;(pureload "facemenu") #### not yet ported
  30         "glyphs"
  31         "objects"
  32         "extents"
  33         "events"
  34         "text-props"
  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
  38         "map-ynp"
  39         "simple"
  40         "keydefs"               ; Before loaddefs so that keymap vars exist.
  41         "abbrev"
  42         "derived"
  43         "minibuf"
  44         "list-mode"
  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"))
  53         "cus-file"
  54         "startup"               ; For initialization of
  55                                 ;  `emacs-user-extension-dir'
  56         "misc"
  57         ;; (pureload "profile")
  58         (unless-feature mule "help-nomule")
  59         "help"
  60         ;; (pureload "hyper-apropos")  Soon...
  61         (unless-feature file-coding "files-nomule")
  62         "files"
  63         "lib-complete"
  64         "format"
  65         "indent"
  66         "isearch-mode"
  67         "buffer"
  68         "buff-menu"
  69         "undo-stack"
  70         "window"
  71         "window-xemacs"
  72         "paths.el"              ; don't get confused if paths compiled.
  73         "lisp"
  74         "page"
  75         "register"
  76         "iso8859-1"             ; This must be before any modes
  77                                         ; (sets standard syntax table.)
  78         "paragraphs"
  79         "easymenu"              ; Added for 20.3.
  80         "lisp-mode"
  81         "text-mode"
  82         "fill"
  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
  88                                 ; auto-gc-threshold
  89         "itimer-autosave"
  90         "printer"
  91
  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")
 102         "select"
 103
 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")
 115
 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 "u02980-Miscellaneous-Mathematical-Symbols-B")
 190         (when-feature utf-2000 "u02900-Supplemental-Arrows-B")
 191         (when-feature utf-2000 "u02E00-CJK-Radical-Supplement")
 192         (when-feature utf-2000 "u02F00-Kangxi-Radicals")
 193         (when-feature utf-2000 "u02FF0-Ideographic-Description-Characters")
 194         (when-feature utf-2000 "u03000-CJK-Symbols-and-Punctuation")
 195         (when-feature utf-2000 "u03040-Hiragana")
 196         (when-feature utf-2000 "u030A0-Katakana")
 197         (when-feature utf-2000 "u03100-Bopomofo")
 198         (when-feature utf-2000 "u03130-Hangul-Compatibility-Jamo")
 199         (when-feature utf-2000 "u03190-Kanbun")
 200         (when-feature utf-2000 "u031A0-Bopomofo-Extended")
 201         (when-feature utf-2000 "u031F0-Katakana-Phonetic-Extensions")
 202         (when-feature utf-2000 "u03200-Enclosed-CJK-Letters-and-Months")
 203         (when-feature utf-2000 "u03300-CJK-Compatibility")
 204         (when-feature utf-2000 "Ideograph-R001-One")
 205         (when-feature utf-2000 "Ideograph-R002-Line")
 206         (when-feature utf-2000 "Ideograph-R003-Dot")
 207         (when-feature utf-2000 "Ideograph-R004-Slash")
 208         (when-feature utf-2000 "Ideograph-R005-Second")
 209         (when-feature utf-2000 "Ideograph-R006-Hook")
 210         (when-feature utf-2000 "Ideograph-R007-Two")
 211         (when-feature utf-2000 "Ideograph-R008-Lid")
 212         (when-feature utf-2000 "Ideograph-R009-Man")
 213         (when-feature utf-2000 "Ideograph-R010-Legs")
 214         (when-feature utf-2000 "Ideograph-R011-Enter")
 215         (when-feature utf-2000 "Ideograph-R012-Eight")
 216         (when-feature utf-2000 "Ideograph-R013-Down-Box")
 217         (when-feature utf-2000 "Ideograph-R014-Cover")
 218         (when-feature utf-2000 "Ideograph-R015-Ice")
 219         (when-feature utf-2000 "Ideograph-R016-Table")
 220         (when-feature utf-2000 "Ideograph-R017-Open-Box")
 221         (when-feature utf-2000 "Ideograph-R018-Knife")
 222         (when-feature utf-2000 "Ideograph-R019-Power")
 223         (when-feature utf-2000 "Ideograph-R020-Wrap")
 224         (when-feature utf-2000 "Ideograph-R021-Spoon")
 225         (when-feature utf-2000 "Ideograph-R022-Right-Open-Box")
 226         (when-feature utf-2000 "Ideograph-R023-Hiding-Enclosure")
 227         (when-feature utf-2000 "Ideograph-R024-Ten")
 228         (when-feature utf-2000 "Ideograph-R025-Divination")
 229         (when-feature utf-2000 "Ideograph-R026-Seal")
 230         (when-feature utf-2000 "Ideograph-R027-Cliff")
 231         (when-feature utf-2000 "Ideograph-R028-Private")
 232         (when-feature utf-2000 "Ideograph-R029-Again")
 233         (when-feature utf-2000 "Ideograph-R030-Mouth")
 234         (when-feature utf-2000 "Ideograph-R031-Enclosure")
 235         (when-feature utf-2000 "Ideograph-R032-Earth")
 236         (when-feature utf-2000 "Ideograph-R033-Scholar")
 237         (when-feature utf-2000 "Ideograph-R034-Go")
 238         (when-feature utf-2000 "Ideograph-R035-Go-Slowly")
 239         (when-feature utf-2000 "Ideograph-R036-Evening")
 240         (when-feature utf-2000 "Ideograph-R037-Big")
 241         (when-feature utf-2000 "Ideograph-R038-Woman")
 242         (when-feature utf-2000 "Ideograph-R039-Child")
 243         (when-feature utf-2000 "Ideograph-R040-Roof")
 244         (when-feature utf-2000 "Ideograph-R041-Inch")
 245         (when-feature utf-2000 "Ideograph-R042-Small")
 246         (when-feature utf-2000 "Ideograph-R043-Lame")
 247         (when-feature utf-2000 "Ideograph-R044-Corpse")
 248         (when-feature utf-2000 "Ideograph-R045-Sprout")
 249         (when-feature utf-2000 "Ideograph-R046-Mountain")
 250         (when-feature utf-2000 "Ideograph-R047-River")
 251         (when-feature utf-2000 "Ideograph-R048-Work")
 252         (when-feature utf-2000 "Ideograph-R049-Oneself")
 253         (when-feature utf-2000 "Ideograph-R050-Turban")
 254         (when-feature utf-2000 "Ideograph-R051-Dry")
 255         (when-feature utf-2000 "Ideograph-R052-Short-Thread")
 256         (when-feature utf-2000 "Ideograph-R053-Dotted-Cliff")
 257         (when-feature utf-2000 "Ideograph-R054-Long-Stride")
 258         (when-feature utf-2000 "Ideograph-R055-Two-Hands")
 259         (when-feature utf-2000 "Ideograph-R056-Shoot")
 260         (when-feature utf-2000 "Ideograph-R057-Bow")
 261         (when-feature utf-2000 "Ideograph-R058-Snout")
 262         (when-feature utf-2000 "Ideograph-R059-Bristle")
 263         (when-feature utf-2000 "Ideograph-R060-Step")
 264         (when-feature utf-2000 "Ideograph-R061-Heart")
 265         (when-feature utf-2000 "Ideograph-R062-Halberd")
 266         (when-feature utf-2000 "Ideograph-R063-Door")
 267         (when-feature utf-2000 "Ideograph-R064-Hand")
 268         (when-feature utf-2000 "Ideograph-R065-Branch")
 269         (when-feature utf-2000 "Ideograph-R066-Rap")
 270         (when-feature utf-2000 "Ideograph-R067-Script")
 271         (when-feature utf-2000 "Ideograph-R068-Dipper")
 272         (when-feature utf-2000 "Ideograph-R069-Axe")
 273         (when-feature utf-2000 "Ideograph-R070-Square")
 274         (when-feature utf-2000 "Ideograph-R071-Not")
 275         (when-feature utf-2000 "Ideograph-R072-Sun")
 276         (when-feature utf-2000 "Ideograph-R073-Say")
 277         (when-feature utf-2000 "Ideograph-R074-Moon")
 278         (when-feature utf-2000 "Ideograph-R075-Tree")
 279         (when-feature utf-2000 "Ideograph-R076-Lack")
 280         (when-feature utf-2000 "Ideograph-R077-Stop")
 281         (when-feature utf-2000 "Ideograph-R078-Death")
 282         (when-feature utf-2000 "Ideograph-R079-Weapon")
 283         (when-feature utf-2000 "Ideograph-R080-Do-Not")
 284         (when-feature utf-2000 "Ideograph-R081-Compare")
 285         (when-feature utf-2000 "Ideograph-R082-Fur")
 286         (when-feature utf-2000 "Ideograph-R083-Clan")
 287         (when-feature utf-2000 "Ideograph-R084-Steam")
 288         (when-feature utf-2000 "Ideograph-R085-Water")
 289         (when-feature utf-2000 "Ideograph-R086-Fire")
 290         (when-feature utf-2000 "Ideograph-R087-Claw")
 291         (when-feature utf-2000 "Ideograph-R088-Father")
 292         (when-feature utf-2000 "Ideograph-R089-Double-X")
 293         (when-feature utf-2000 "Ideograph-R090-Half-Tree-Trunk")
 294         (when-feature utf-2000 "Ideograph-R091-Slice")
 295         (when-feature utf-2000 "Ideograph-R092-Fang")
 296         (when-feature utf-2000 "Ideograph-R093-Cow")
 297         (when-feature utf-2000 "Ideograph-R094-Dog")
 298         (when-feature utf-2000 "Ideograph-R095-Profound")
 299         (when-feature utf-2000 "Ideograph-R096-Jade")
 300         (when-feature utf-2000 "Ideograph-R097-Melon")
 301         (when-feature utf-2000 "Ideograph-R098-Tile")
 302         (when-feature utf-2000 "Ideograph-R099-Sweet")
 303         (when-feature utf-2000 "Ideograph-R100-Life")
 304         (when-feature utf-2000 "Ideograph-R101-Use")
 305         (when-feature utf-2000 "Ideograph-R102-Field")
 306         (when-feature utf-2000 "Ideograph-R103-Bolt-Of-Cloth")
 307         (when-feature utf-2000 "Ideograph-R104-Sickness")
 308         (when-feature utf-2000 "Ideograph-R105-Dotted-Tent")
 309         (when-feature utf-2000 "Ideograph-R106-White")
 310         (when-feature utf-2000 "Ideograph-R107-Skin")
 311         (when-feature utf-2000 "Ideograph-R108-Dish")
 312         (when-feature utf-2000 "Ideograph-R109-Eye")
 313         (when-feature utf-2000 "Ideograph-R110-Spear")
 314         (when-feature utf-2000 "Ideograph-R111-Arrow")
 315         (when-feature utf-2000 "Ideograph-R112-Stone")
 316         (when-feature utf-2000 "Ideograph-R113-Spirit")
 317         (when-feature utf-2000 "Ideograph-R114-Track")
 318         (when-feature utf-2000 "Ideograph-R115-Grain")
 319         (when-feature utf-2000 "Ideograph-R116-Cave")
 320         (when-feature utf-2000 "Ideograph-R117-Stand")
 321         (when-feature utf-2000 "Ideograph-R118-Bamboo")
 322         (when-feature utf-2000 "Ideograph-R119-Rice")
 323         (when-feature utf-2000 "Ideograph-R120-Silk")
 324         (when-feature utf-2000 "Ideograph-R121-Jar")
 325         (when-feature utf-2000 "Ideograph-R122-Net")
 326         (when-feature utf-2000 "Ideograph-R123-Sheep")
 327         (when-feature utf-2000 "Ideograph-R124-Feather")
 328         (when-feature utf-2000 "Ideograph-R125-Old")
 329         (when-feature utf-2000 "Ideograph-R126-And")
 330         (when-feature utf-2000 "Ideograph-R127-Plow")
 331         (when-feature utf-2000 "Ideograph-R128-Ear")
 332         (when-feature utf-2000 "Ideograph-R129-Brush")
 333         (when-feature utf-2000 "Ideograph-R130-Meat")
 334         (when-feature utf-2000 "Ideograph-R131-Minister")
 335         (when-feature utf-2000 "Ideograph-R132-Self")
 336         (when-feature utf-2000 "Ideograph-R133-Arrive")
 337         (when-feature utf-2000 "Ideograph-R134-Mortar")
 338         (when-feature utf-2000 "Ideograph-R135-Tongue")
 339         (when-feature utf-2000 "Ideograph-R136-Oppose")
 340         (when-feature utf-2000 "Ideograph-R137-Boat")
 341         (when-feature utf-2000 "Ideograph-R138-Stopping")
 342         (when-feature utf-2000 "Ideograph-R139-Color")
 343         (when-feature utf-2000 "Ideograph-R140-Grass")
 344         (when-feature utf-2000 "Ideograph-R141-Tiger")
 345         (when-feature utf-2000 "Ideograph-R142-Insect")
 346         (when-feature utf-2000 "Ideograph-R143-Blood")
 347         (when-feature utf-2000 "Ideograph-R144-Walk-Enclosure")
 348         (when-feature utf-2000 "Ideograph-R145-Clothes")
 349         (when-feature utf-2000 "Ideograph-R146-West")
 350         (when-feature utf-2000 "Ideograph-R147-See")
 351         (when-feature utf-2000 "Ideograph-R148-Horn")
 352         (when-feature utf-2000 "Ideograph-R149-Speech")
 353         (when-feature utf-2000 "Ideograph-R150-Valley")
 354         (when-feature utf-2000 "Ideograph-R151-Bean")
 355         (when-feature utf-2000 "Ideograph-R152-Pig")
 356         (when-feature utf-2000 "Ideograph-R153-Badger")
 357         (when-feature utf-2000 "Ideograph-R154-Shell")
 358         (when-feature utf-2000 "Ideograph-R155-Red")
 359         (when-feature utf-2000 "Ideograph-R156-Run")
 360         (when-feature utf-2000 "Ideograph-R157-Foot")
 361         (when-feature utf-2000 "Ideograph-R158-Body")
 362         (when-feature utf-2000 "Ideograph-R159-Cart")
 363         (when-feature utf-2000 "Ideograph-R160-Bitter")
 364         (when-feature utf-2000 "Ideograph-R161-Morning")
 365         (when-feature utf-2000 "Ideograph-R162-Walk")
 366         (when-feature utf-2000 "Ideograph-R163-City")
 367         (when-feature utf-2000 "Ideograph-R164-Wine")
 368         (when-feature utf-2000 "Ideograph-R165-Distinguish")
 369         (when-feature utf-2000 "Ideograph-R166-Village")
 370         (when-feature utf-2000 "Ideograph-R167-Gold")
 371         (when-feature utf-2000 "Ideograph-R168-Long")
 372         (when-feature utf-2000 "Ideograph-R169-Gate")
 373         (when-feature utf-2000 "Ideograph-R170-Mound")
 374         (when-feature utf-2000 "Ideograph-R171-Slave")
 375         (when-feature utf-2000 "Ideograph-R172-Short-Tailed-Bird")
 376         (when-feature utf-2000 "Ideograph-R173-Rain")
 377         (when-feature utf-2000 "Ideograph-R174-Blue")
 378         (when-feature utf-2000 "Ideograph-R175-Wrong")
 379         (when-feature utf-2000 "Ideograph-R176-Face")
 380         (when-feature utf-2000 "Ideograph-R177-Leather")
 381         (when-feature utf-2000 "Ideograph-R178-Tanned-Leather")
 382         (when-feature utf-2000 "Ideograph-R179-Leek")
 383         (when-feature utf-2000 "Ideograph-R180-Sound")
 384         (when-feature utf-2000 "Ideograph-R181-Leaf")
 385         (when-feature utf-2000 "Ideograph-R182-Wind")
 386         (when-feature utf-2000 "Ideograph-R183-Fly")
 387         (when-feature utf-2000 "Ideograph-R184-Eat")
 388         (when-feature utf-2000 "Ideograph-R185-Head")
 389         (when-feature utf-2000 "Ideograph-R186-Fragrant")
 390         (when-feature utf-2000 "Ideograph-R187-Horse")
 391         (when-feature utf-2000 "Ideograph-R188-Bone")
 392         (when-feature utf-2000 "Ideograph-R189-Tall")
 393         (when-feature utf-2000 "Ideograph-R190-Hair")
 394         (when-feature utf-2000 "Ideograph-R191-Fight")
 395         (when-feature utf-2000 "Ideograph-R192-Sacrificial-Wine")
 396         (when-feature utf-2000 "Ideograph-R193-Cauldron")
 397         (when-feature utf-2000 "Ideograph-R194-Ghost")
 398         (when-feature utf-2000 "Ideograph-R195-Fish")
 399         (when-feature utf-2000 "Ideograph-R196-Bird")
 400         (when-feature utf-2000 "Ideograph-R197-Salt")
 401         (when-feature utf-2000 "Ideograph-R198-Deer")
 402         (when-feature utf-2000 "Ideograph-R199-Wheat")
 403         (when-feature utf-2000 "Ideograph-R200-Hemp")
 404         (when-feature utf-2000 "Ideograph-R201-Yellow")
 405         (when-feature utf-2000 "Ideograph-R202-Millet")
 406         (when-feature utf-2000 "Ideograph-R203-Black")
 407         (when-feature utf-2000 "Ideograph-R204-Embroidery")
 408         (when-feature utf-2000 "Ideograph-R205-Frog")
 409         (when-feature utf-2000 "Ideograph-R206-Tripod")
 410         (when-feature utf-2000 "Ideograph-R207-Drum")
 411         (when-feature utf-2000 "Ideograph-R208-Rat")
 412         (when-feature utf-2000 "Ideograph-R209-Nose")
 413         (when-feature utf-2000 "Ideograph-R210-Even")
 414         (when-feature utf-2000 "Ideograph-R211-Tooth")
 415         (when-feature utf-2000 "Ideograph-R212-Dragon")
 416         (when-feature utf-2000 "Ideograph-R213-Turtle")
 417         (when-feature utf-2000 "Ideograph-R214-Flute")
 418         (when-feature utf-2000 "u0A000-Yi-Syllables")
 419         (when-feature utf-2000 "u0A490-Yi-Radicals")
 420         (when-feature utf-2000 "u0AC00-Hangul-Syllables")
 421         (when-feature utf-2000 "u0E000-Private-Use")
 422         (when-feature utf-2000 "u0FB00-Alphabetic-Presentation-Forms")
 423         (when-feature utf-2000 "u0FB50-Arabic-Presentation-Forms-A")
 424         (when-feature utf-2000 "u0FE20-Combining-Half-Marks")
 425         (when-feature utf-2000 "u0FE30-CJK-Compatibility-Forms")
 426         (when-feature utf-2000 "u0FE50-Small-Form-Variants")
 427         (when-feature utf-2000 "u0FE70-Arabic-Presentation-Forms-B")
 428         (when-feature utf-2000 "u0FF00-Halfwidth-and-Fullwidth-Forms")
 429         (when-feature utf-2000 "u0FFF0-Specials")
 430         (when-feature utf-2000 "ad-hoc-cdp")
 431         (when-feature utf-2000 "ccs-tcvn5712.el")
 432         (when-feature mule "mule-charset")
 433         (when-feature utf-2000 "mojikyo-conf")
 434         (when-feature mule "mule-coding")
 435         ;; All files after this can have extended characters in them.
 436         (when-feature mule "mule-help")
 437         (when-feature mule "mule-category")
 438         (when-feature mule "mule-ccl")
 439         (when-feature mule "mule-misc")
 440         (when-feature mule "kinsoku")
 441         (when-feature (and mule x) "mule-x-init")
 442         (when-feature (and mule tty) "mule-tty-init")
 443         (when-feature mule "mule-cmds") ; to sync with Emacs 20.1
 444
 445 ;; after this goes the specific lisp routines for a particular input system
 446 ;; 97.2.5 JHod Shouldn't these go into a site-load file to allow site
 447 ;; or user switching of input systems???
 448 ;(if (featurep 'wnn)
 449 ;    (progn
 450 ;      (pureload "egg")
 451 ;      (pureload "egg-wnn")
 452 ;      (setq egg-default-startup-file "eggrc-wnn")))
 453
 454 ;; (if (and (boundp 'CANNA) CANNA)
 455 ;;     (pureload "canna")
 456 ;;   )
 457
 458 ;; Now load files to set up all the different languages/environments
 459 ;; that Mule knows about.
 460
 461         (when-feature mule "chinese")
 462         (when-feature mule "mule/cyrillic") ; overloaded in leim/quail
 463         (when-feature mule "english")
 464         (when-feature mule "ethiopic")
 465         (when-feature mule "european")
 466         (when-feature mule "mule/greek") ; overloaded in leim/quail
 467         (when-feature mule "hebrew")
 468         (when-feature mule "japanese")
 469         (when-feature mule "korean")
 470         (when-feature mule "misc-lang")
 471         (when-feature mule "thai-xtis-chars")
 472         (when-feature mule "mule/thai-xtis") ; overloaded in leim/quail
 473         (when-feature mule "viet-chars")
 474         (when-feature (and mule (not utf-2000)) "viet-ccl")
 475         (when-feature mule "vietnamese")
 476
 477         ;; Specialized language support
 478         (when-feature (and mule CANNA) "canna-leim")
 479 ;; Egg/Its is now a package
 480 ;       (when-feature (and mule wnn) "egg-leim")
 481 ;       (when-feature (and mule wnn) "egg-kwnn-leim")
 482 ;       (when-feature (and mule wnn) "egg-cwnn-leim")
 483 ;       (when-feature mule "egg-sj3-leim")
 484 ;; SKK is now a package
 485 ;       (when-feature mule "skk-leim")
 486
 487 ;; Set up the XEmacs environment for Mule.
 488 ;; Assumes the existence of various stuff above.
 489         (when-feature mule "mule-init")
 490
 491 ;; Enable Mule capability for Gnus, mail, etc...
 492 ;; Moved to sunpro-load.el - the default only for Sun.
 493 ;;(pureload "mime-setup")
 494 ;;; mule-load.el ends here
 495
 496 ;; preload InfoDock stuff.  should almost certainly not be here if
 497 ;; id-menus is not here.  infodock needs to figure out a clever way to
 498 ;; advise this stuff or we need to export a clean way for infodock or
 499 ;; others to control this programmatically.
 500         (when-feature (and infodock (or x mswindows) menubar) "id-menus")
 501 ;; preload the X code.
 502         (when-feature x "x-faces")
 503         (when-feature x "x-iso8859-1")
 504         (when-feature x "x-mouse")
 505         (when-feature x "x-select")
 506         (when-feature (and x scrollbar) "x-scrollbar")
 507         (when-feature x "x-misc")
 508         (when-feature x "x-init")
 509         (when-feature x "x-win-xfree86")
 510         (when-feature x "x-win-sun")
 511 ;; preload the mswindows code.
 512         (when-feature mswindows "msw-glyphs")
 513         (when-feature mswindows "msw-faces")
 514         (when-feature mswindows "msw-mouse")
 515         (when-feature mswindows "msw-init")
 516         (when-feature mswindows "msw-select")
 517 ;; preload the TTY init code.
 518         (when-feature tty "tty-init")
 519 ;;; Formerly in tooltalk/tooltalk-load.el
 520         ;; Moved to tooltalk package
 521         ;; (when-feature tooltalk "tooltalk-macros")
 522         ;; (when-feature tooltalk "tooltalk-util")
 523         ;; (when-feature tooltalk "tooltalk-init")
 524         ;; "vc-hooks"           ; Packaged.  Available in two versions.
 525         ;; "ediff-hook"         ; Packaged.
 526         "fontl-hooks"
 527         "auto-show"
 528         (when-feature ldap "ldap")
 529
 530 ;; (when-feature energize "energize/energize-load.el")
 531 ;;; formerly in sunpro/sunpro-load.el
 532 ;;      (when-feature (and mule sparcworks) "mime-setup")
 533
 534         ;; Moved to Sun package
 535         ;; (when-feature sparcworks "cc-mode") ; Requires cc-mode package
 536         ;; (when-feature sparcworks "sunpro-init")
 537         ;; (when-feature sparcworks "ring")
 538         ;; (when-feature sparcworks "comint") ; Requires comint package
 539         ;; (when-feature sparcworks "annotations")
 540
 541 ;;; formerly in eos/sun-eos-load.el
 542 ;;      (when-feature sparcworks "sun-eos-init")
 543 ;;      (when-feature sparcworks "sun-eos-common")
 544 ;;      (when-feature sparcworks "sun-eos-editor")
 545 ;;      (when-feature sparcworks "sun-eos-browser")
 546 ;;      (when-feature sparcworks "sun-eos-debugger")
 547 ;;      (when-feature sparcworks "sun-eos-debugger-extra")
 548 ;;      (when-feature sparcworks "sun-eos-menubar")
 549         "loadhist"              ; Must be dumped before loaddefs is loaded
 550         "loaddefs"              ; <=== autoloads get loaded here
 551 ))