(Fset_charset_mapping_table): Fix problem with `ascii'.
[chise/xemacs-chise.git] / lisp / dumped-lisp.el
1 (setq preloaded-file-list
2       (assemble-list
3         "backquote"             ; needed for defsubst etc.
4         "bytecomp-runtime"      ; define defsubst
5         "find-paths"
6         "packages"              ; Bootstrap run-time lisp environment
7         "setup-paths"
8         "dump-paths"
9         "subr"                  ; load the most basic Lisp functions
10         "replace"               ; match-string used in version.el.
11         ; Ignore compiled-by-mistake version.elc
12         "version.el"
13         "cl"
14         "cl-extra"
15         "cl-seq"
16         "widget"
17         "custom"                ; Before the world so everything can be
18                                 ; customized
19         "cus-start"             ; for customization of builtin variables
20         "cmdloop"
21         "keymap"
22         "syntax"
23         "device"
24         "console"
25         "obsolete"
26         "specifier"
27         "faces"                 ; must be loaded before any make-face call
28 ;;(pureload "facemenu") #### not yet ported
29         "glyphs"
30         "objects"
31         "extents"
32         "events"
33         "text-props"
34         "process" ;; This is bad. network-streams may not be defined.
35         (when-feature multicast "multicast") ; #+network-streams implicitely true
36         "frame"                 ; move up here cause some stuff needs it here
37         "map-ynp"
38         "simple"
39         "keydefs"               ; Before loaddefs so that keymap vars exist.
40         "abbrev"
41         "derived"
42         "minibuf"
43         "list-mode"
44         "modeline"              ; needs simple.el to be loaded first
45 ;; If SparcWorks support is included some additional packages are
46 ;; dumped which would normally have autoloads.  To avoid
47 ;; duplicate doc string warnings, SparcWorks uses a separate
48 ;; autoloads file with the dumped packages removed.
49 ;; After fixing, eos/loaddefs-eos and loaddefs appear identical?!!
50 ;; So just make loaddefs-eos go away...
51 ;;(pureload (if (featurep 'sparcworks) "eos/loaddefs-eos" "loaddefs"))
52         "startup"               ; For initialization of
53                                 ;  `emacs-user-extension-dir'
54         "misc"
55         ;; (pureload "profile")
56         (unless-feature mule "help-nomule")
57         "help"
58         ;; (pureload "hyper-apropos")  Soon...
59         (unless-feature file-coding "files-nomule")
60         "files"
61         "lib-complete"
62         "format"
63         "indent"
64         "isearch-mode"
65         "buffer"
66         "buff-menu"
67         "undo-stack"
68         "window"
69         "window-xemacs"
70         "paths.el"              ; don't get confused if paths compiled.
71         "lisp"
72         "page"
73         "register"
74         "iso8859-1"             ; This must be before any modes
75                                         ; (sets standard syntax table.)
76         "paragraphs"
77         "easymenu"              ; Added for 20.3.
78         "lisp-mode"
79         "text-mode"
80         "fill"
81         "auto-save"             ; Added for 20.4
82
83         (when-feature windows-nt "winnt")
84         (when-feature lisp-float-type "float-sup")
85         "itimer"                ; for vars auto-save-timeout and
86                                 ; auto-gc-threshold
87         "itimer-autosave"
88         (when-feature toolbar "toolbar")
89         (when-feature scrollbar "scrollbar")
90         (when-feature menubar "menubar")
91         (when-feature dialog "dialog")
92         (when-feature mule "mule-conf")
93         (when-feature utf-2000 "ccs-jisx0201-latin.el")
94         (when-feature utf-2000 "ccs-viscii.el")
95         (when-feature utf-2000 "ccs-jisx0208-1983.el")
96         (when-feature utf-2000 "u00000-C0.el")
97         (when-feature utf-2000 "u00020-Basic-Latin.el")
98         (when-feature utf-2000 "u00080-C1.el")
99         (when-feature utf-2000 "u000A0-Latin-1-Supplement.el")
100         (when-feature utf-2000 "u00100-Latin-Extended-A.el")
101         (when-feature utf-2000 "u00180-Latin-Extended-B.el")
102         (when-feature utf-2000 "u00250-IPA-Extensions.el")
103         (when-feature utf-2000 "u002B0-Spacing-Modifier-Letters.el")
104         (when-feature utf-2000 "u00300-Combining-Diacritical-Marks.el")
105         (when-feature utf-2000 "u00370-Greek.el")
106         (when-feature mule "mule-charset")
107         (when-feature file-coding "coding")
108         (when-feature mule "mule-coding")
109 ;; Handle I/O of files with extended characters.
110         (when-feature file-coding "code-files")
111 ;; Handle process with encoding/decoding non-ascii coding-system.
112         (when-feature file-coding "code-process")
113         (when-feature mule "mule-help")
114 ;; Load the remaining basic files.
115         (when-feature mule "mule-category")
116         (when-feature mule "mule-ccl")
117         (when-feature mule "mule-misc")
118         (when-feature mule "kinsoku")
119         (when-feature (and mule x) "mule-x-init")
120         (when-feature (and mule tty) "mule-tty-init")
121         (when-feature mule "mule-cmds") ; to sync with Emacs 20.1
122
123 ;; after this goes the specific lisp routines for a particular input system
124 ;; 97.2.5 JHod Shouldn't these go into a site-load file to allow site
125 ;; or user switching of input systems???
126 ;(if (featurep 'wnn)
127 ;    (progn
128 ;      (pureload "egg")
129 ;      (pureload "egg-wnn")
130 ;      (setq egg-default-startup-file "eggrc-wnn")))
131
132 ;; (if (and (boundp 'CANNA) CANNA)
133 ;;     (pureload "canna")
134 ;;   )
135
136 ;; Now load files to set up all the different languages/environments
137 ;; that Mule knows about.
138
139         (when-feature mule "arabic")
140         (when-feature mule "chinese")
141         (when-feature mule "mule/cyrillic") ; overloaded in leim/quail
142         (when-feature mule "english")
143         (when-feature mule "ethiopic")
144         (when-feature mule "european")
145         (when-feature mule "mule/greek") ; overloaded in leim/quail
146         (when-feature mule "hebrew")
147         (when-feature mule "japanese")
148         (when-feature mule "korean")
149         (when-feature mule "misc-lang")
150         (when-feature mule "thai-xtis-chars")
151         (when-feature mule "mule/thai-xtis") ; overloaded in leim/quail
152         (when-feature mule "viet-chars")
153         (when-feature (and mule (not utf-2000)) "vietnamese")
154
155         ;; Specialized language support
156         (when-feature (and mule CANNA) "canna-leim")
157 ;; Egg/Its is now a package
158 ;       (when-feature (and mule wnn) "egg-leim")
159 ;       (when-feature (and mule wnn) "egg-kwnn-leim")
160 ;       (when-feature (and mule wnn) "egg-cwnn-leim")
161 ;       (when-feature mule "egg-sj3-leim")
162 ;; SKK is now a package
163 ;       (when-feature mule "skk-leim")
164
165 ;; Set up the XEmacs environment for Mule.
166 ;; Assumes the existence of various stuff above.
167         (when-feature mule "mule-init")
168
169 ;; Enable Mule capability for Gnus, mail, etc...
170 ;; Moved to sunpro-load.el - the default only for Sun.
171 ;;(pureload "mime-setup")
172 ;;; mule-load.el ends here
173         (when-feature window-system "gui")
174         (when-feature window-system "mode-motion")
175         (when-feature window-system "mouse")
176         (when-feature window-system "select")
177         (when-feature dragdrop-api "dragdrop")
178 ;; preload the X code, for faster startup.
179         (when-feature (and (not infodock)
180                            (or x mswindows) menubar) "menubar-items")
181         (when-feature (and infodock (or x mswindows) menubar) "id-menus")
182         (when-feature (and gutter menubar window-system) "gutter-items")
183         (when-feature x "x-faces")
184         (when-feature x "x-iso8859-1")
185         (when-feature x "x-mouse")
186         (when-feature x "x-select")
187         (when-feature (and x scrollbar) "x-scrollbar")
188         (when-feature x "x-misc")
189         (when-feature x "x-init")
190         (when-feature (and (not infodock)
191                            window-system toolbar) "toolbar-items")
192         (when-feature x "x-win-xfree86")
193         (when-feature x "x-win-sun")
194 ;; preload the mswindows code.
195         (when-feature mswindows "msw-glyphs")
196         (when-feature mswindows "msw-faces")
197         (when-feature mswindows "msw-mouse")
198         (when-feature mswindows "msw-init")
199         (when-feature mswindows "msw-select")
200 ;; preload the TTY init code.
201         (when-feature tty "tty-init")
202 ;;; Formerly in tooltalk/tooltalk-load.el
203         ;; Moved to tooltalk package
204         ;; (when-feature tooltalk "tooltalk-macros")
205         ;; (when-feature tooltalk "tooltalk-util")
206         ;; (when-feature tooltalk "tooltalk-init")
207         ;; "vc-hooks"           ; Packaged.  Available in two versions.
208         ;; "ediff-hook"         ; Packaged.
209         "fontl-hooks"
210         "auto-show"
211         (when-feature ldap "ldap")
212
213 ;; (when-feature energize "energize/energize-load.el")
214 ;;; formerly in sunpro/sunpro-load.el
215 ;;      (when-feature (and mule sparcworks) "mime-setup")
216
217         ;; Moved to Sun package
218         ;; (when-feature sparcworks "cc-mode") ; Requires cc-mode package
219         ;; (when-feature sparcworks "sunpro-init")
220         ;; (when-feature sparcworks "ring")
221         ;; (when-feature sparcworks "comint") ; Requires comint package
222         ;; (when-feature sparcworks "annotations")
223
224 ;;; formerly in eos/sun-eos-load.el
225 ;;      (when-feature sparcworks "sun-eos-init")
226 ;;      (when-feature sparcworks "sun-eos-common")
227 ;;      (when-feature sparcworks "sun-eos-editor")
228 ;;      (when-feature sparcworks "sun-eos-browser")
229 ;;      (when-feature sparcworks "sun-eos-debugger")
230 ;;      (when-feature sparcworks "sun-eos-debugger-extra")
231 ;;      (when-feature sparcworks "sun-eos-menubar")
232         "loadhist"              ; Must be dumped before loaddefs is loaded
233         "loaddefs"              ; <=== autoloads get loaded here
234 ))