(insert-ideograph-radical-char-data): Ignore non-Unicode UCS
[chise/xemacs-chise.git] / 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 "update-cdb")
127         (when-feature mule "mule-charset")
128         (when-feature mule "mule-coding")
129         ;; All files after this can have extended characters in them.
130         (when-feature mule "mule-help")
131         (when-feature mule "mule-category")
132         (when-feature mule "mule-ccl")
133         (when-feature mule "mule-misc")
134         (when-feature mule "kinsoku")
135         (when-feature (and mule x) "mule-x-init")
136         (when-feature (and mule tty) "mule-tty-init")
137         (when-feature mule "mule-cmds") ; to sync with Emacs 20.1
138
139 ;; after this goes the specific lisp routines for a particular input system
140 ;; 97.2.5 JHod Shouldn't these go into a site-load file to allow site
141 ;; or user switching of input systems???
142 ;(if (featurep 'wnn)
143 ;    (progn
144 ;      (pureload "egg")
145 ;      (pureload "egg-wnn")
146 ;      (setq egg-default-startup-file "eggrc-wnn")))
147
148 ;; (if (and (boundp 'CANNA) CANNA)
149 ;;     (pureload "canna")
150 ;;   )
151
152 ;; Now load files to set up all the different languages/environments
153 ;; that Mule knows about.
154
155         (when-feature mule "chinese")
156         (when-feature mule "mule/cyrillic") ; overloaded in leim/quail
157         (when-feature mule "english")
158         (when-feature mule "ethiopic")
159         (when-feature mule "european")
160         (when-feature mule "mule/greek") ; overloaded in leim/quail
161         (when-feature mule "hebrew")
162         (when-feature mule "japanese")
163         (when-feature mule "korean")
164         (when-feature mule "misc-lang")
165         (when-feature mule "thai-xtis-chars")
166         (when-feature mule "mule/thai-xtis") ; overloaded in leim/quail
167         (when-feature mule "viet-chars")
168         (when-feature (and mule (not utf-2000)) "viet-ccl")
169         (when-feature mule "vietnamese")
170
171         ;; Specialized language support
172         (when-feature (and mule CANNA) "canna-leim")
173 ;; Egg/Its is now a package
174 ;       (when-feature (and mule wnn) "egg-leim")
175 ;       (when-feature (and mule wnn) "egg-kwnn-leim")
176 ;       (when-feature (and mule wnn) "egg-cwnn-leim")
177 ;       (when-feature mule "egg-sj3-leim")
178 ;; SKK is now a package
179 ;       (when-feature mule "skk-leim")
180
181 ;; Set up the XEmacs environment for Mule.
182 ;; Assumes the existence of various stuff above.
183         (when-feature mule "mule-init")
184
185 ;; Enable Mule capability for Gnus, mail, etc...
186 ;; Moved to sunpro-load.el - the default only for Sun.
187 ;;(pureload "mime-setup")
188 ;;; mule-load.el ends here
189
190 ;; preload InfoDock stuff.  should almost certainly not be here if
191 ;; id-menus is not here.  infodock needs to figure out a clever way to
192 ;; advise this stuff or we need to export a clean way for infodock or
193 ;; others to control this programmatically.
194         (when-feature (and infodock (or x mswindows) menubar) "id-menus")
195 ;; preload the X code.
196         (when-feature x "x-faces")
197         (when-feature x "x-iso8859-1")
198         (when-feature x "x-mouse")
199         (when-feature x "x-select")
200         (when-feature (and x scrollbar) "x-scrollbar")
201         (when-feature x "x-misc")
202         (when-feature x "x-init")
203         (when-feature x "x-win-xfree86")
204         (when-feature x "x-win-sun")
205 ;; preload the mswindows code.
206         (when-feature mswindows "msw-glyphs")
207         (when-feature mswindows "msw-faces")
208         (when-feature mswindows "msw-mouse")
209         (when-feature mswindows "msw-init")
210         (when-feature mswindows "msw-select")
211 ;; preload the TTY init code.
212         (when-feature tty "tty-init")
213 ;;; Formerly in tooltalk/tooltalk-load.el
214         ;; Moved to tooltalk package
215         ;; (when-feature tooltalk "tooltalk-macros")
216         ;; (when-feature tooltalk "tooltalk-util")
217         ;; (when-feature tooltalk "tooltalk-init")
218         ;; "vc-hooks"           ; Packaged.  Available in two versions.
219         ;; "ediff-hook"         ; Packaged.
220         "fontl-hooks"
221         "auto-show"
222         (when-feature ldap "ldap")
223
224 ;; (when-feature energize "energize/energize-load.el")
225 ;;; formerly in sunpro/sunpro-load.el
226 ;;      (when-feature (and mule sparcworks) "mime-setup")
227
228         ;; Moved to Sun package
229         ;; (when-feature sparcworks "cc-mode") ; Requires cc-mode package
230         ;; (when-feature sparcworks "sunpro-init")
231         ;; (when-feature sparcworks "ring")
232         ;; (when-feature sparcworks "comint") ; Requires comint package
233         ;; (when-feature sparcworks "annotations")
234
235 ;;; formerly in eos/sun-eos-load.el
236 ;;      (when-feature sparcworks "sun-eos-init")
237 ;;      (when-feature sparcworks "sun-eos-common")
238 ;;      (when-feature sparcworks "sun-eos-editor")
239 ;;      (when-feature sparcworks "sun-eos-browser")
240 ;;      (when-feature sparcworks "sun-eos-debugger")
241 ;;      (when-feature sparcworks "sun-eos-debugger-extra")
242 ;;      (when-feature sparcworks "sun-eos-menubar")
243         ;; (when-feature utf-2000 "make-cdbs")
244         (when-feature utf-2000 "close-cdb")
245         "loadhist"              ; Must be dumped before loaddefs is loaded
246         "loaddefs"              ; <=== autoloads get loaded here
247 ))