Mercurial > hg > xemacs-beta

comparison lisp/dumped-lisp.el @ 304:c6de09ad3017 r21-0b50

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Import from CVS: tag r21-0b50
author cvs
date Mon, 13 Aug 2007 10:41:12 +0200
parents 57709be46d1b
children afd57c14dfc8
comparison
equal deleted inserted replaced
303:d02ffe1d75ed 304:c6de09ad3017
1 (setq preloaded-file-list 1 (setq preloaded-file-list
2 '("backquote" ; needed for defsubst etc. 2 (assemble-list
3 "backquote" ; needed for defsubst etc.
3 "bytecomp-runtime" ; define defsubst 4 "bytecomp-runtime" ; define defsubst
4 "Installation.el" 5 "Installation.el"
5 "find-paths" 6 "find-paths"
6 "packages" ; Bootstrap run-time lisp environment 7 "packages" ; Bootstrap run-time lisp environment
7 "setup-paths" 8 "setup-paths"
30 "objects" 31 "objects"
31 "extents" 32 "extents"
32 "events" 33 "events"
33 "text-props" 34 "text-props"
34 "process" ;; This is bad. network-streams may not be defined. 35 "process" ;; This is bad. network-streams may not be defined.
35 #+multicast "multicast" ;; #+network-streams implicitely true 36 (when-feature multicast "multicast") ; #+network-streams implicitely true
36 "frame" ; move up here cause some stuff needs it here 37 "frame" ; move up here cause some stuff needs it here
37 "map-ynp" 38 "map-ynp"
38 "simple" 39 "simple"
39 "keydefs" ; Before loaddefs so that keymap vars exist. 40 "keydefs" ; Before loaddefs so that keymap vars exist.
40 "abbrev" 41 "abbrev"
51 ;;(pureload (if (featurep 'sparcworks) "eos/loaddefs-eos" "loaddefs")) 52 ;;(pureload (if (featurep 'sparcworks) "eos/loaddefs-eos" "loaddefs"))
52 "startup" ; For initialization of 53 "startup" ; For initialization of
53 ; `emacs-user-extension-dir' 54 ; `emacs-user-extension-dir'
54 "misc" 55 "misc"
55 ;; (pureload "profile") 56 ;; (pureload "profile")
56 #-mule "help-nomule" 57 (unless-feature mule "help-nomule")
57 "help" 58 "help"
58 ;; (pureload "hyper-apropos") Soon... 59 ;; (pureload "hyper-apropos") Soon...
59 #-file-coding "files-nomule" 60 (unless-feature file-coding "files-nomule")
60 "files" 61 "files"
61 "lib-complete" 62 "lib-complete"
62 "format" 63 "format"
63 "indent" 64 "indent"
64 "isearch-mode" 65 "isearch-mode"
78 "lisp-mode" 79 "lisp-mode"
79 "text-mode" 80 "text-mode"
80 "fill" 81 "fill"
81 "auto-save" ; Added for 20.4 82 "auto-save" ; Added for 20.4
82 83
83 #+windows-nt "winnt" 84 (when-feature windows-nt "winnt")
84 #+lisp-float-type "float-sup" 85 (when-feature lisp-float-type "float-sup")
85 "itimer" ; for vars auto-save-timeout and 86 "itimer" ; for vars auto-save-timeout and
86 ; auto-gc-threshold 87 ; auto-gc-threshold
87 "itimer-autosave" 88 "itimer-autosave"
88 #+toolbar "toolbar" 89 (when-feature toolbar "toolbar")
89 #+scrollbar "scrollbar" 90 (when-feature scrollbar "scrollbar")
90 #+menubar "menubar" 91 (when-feature menubar "menubar")
91 #+dialog "dialog" 92 (when-feature dialog "dialog")
92 #+mule "mule-charset" 93 (when-feature mule "mule-charset")
93 #+file-coding "coding" 94 (when-feature file-coding "coding")
94 #+mule "mule-coding" 95 (when-feature mule "mule-coding")
95 ;; Handle I/O of files with extended characters. 96 ;; Handle I/O of files with extended characters.
96 #+file-coding "code-files" 97 (when-feature file-coding "code-files")
97 #+mule "mule-files" 98 (when-feature mule "mule-files")
98 ;; Handle process with encoding/decoding non-ascii coding-system. 99 ;; Handle process with encoding/decoding non-ascii coding-system.
99 #+file-coding "code-process" 100 (when-feature file-coding "code-process")
100 #+mule "mule-help" 101 (when-feature mule "mule-help")
101 ;; Load the remaining basic files. 102 ;; Load the remaining basic files.
102 #+mule "mule-category" 103 (when-feature mule "mule-category")
103 #+mule "mule-ccl" 104 (when-feature mule "mule-ccl")
104 #+mule "mule-misc" 105 (when-feature mule "mule-misc")
105 #+mule "kinsoku" 106 (when-feature mule "kinsoku")
106 #+(and mule x) "mule-x-init" 107 (when-feature (and mule x) "mule-x-init")
107 #+(and mule tty) "mule-tty-init" 108 (when-feature (and mule tty) "mule-tty-init")
108 #+mule "mule-cmds" ; to sync with Emacs 20.1 109 (when-feature mule "mule-cmds") ; to sync with Emacs 20.1
109 110
110 ;; after this goes the specific lisp routines for a particular input system 111 ;; after this goes the specific lisp routines for a particular input system
111 ;; 97.2.5 JHod Shouldn't these go into a site-load file to allow site 112 ;; 97.2.5 JHod Shouldn't these go into a site-load file to allow site
112 ;; or user switching of input systems??? 113 ;; or user switching of input systems???
113 ;(if (featurep 'wnn) 114 ;(if (featurep 'wnn)
121 ;; ) 122 ;; )
122 123
123 ;; Now load files to set up all the different languages/environments 124 ;; Now load files to set up all the different languages/environments
124 ;; that Mule knows about. 125 ;; that Mule knows about.
125 126
126 #+mule "arabic" 127 (when-feature mule "arabic")
127 #+mule "chinese" 128 (when-feature mule "chinese")
128 #+mule "mule-base/cyrillic" ; overloaded in leim/quail 129 (when-feature mule "mule-base/cyrillic") ; overloaded in leim/quail
129 #+mule "english" 130 (when-feature mule "english")
130 ;; #+mule "ethiopic" 131 ;; (when-feature mule "ethiopic")
131 #+mule "european" 132 (when-feature mule "european")
132 #+mule "mule-base/greek" ; overloaded in leim/quail 133 (when-feature mule "mule-base/greek") ; overloaded in leim/quail
133 #+mule "hebrew" 134 (when-feature mule "hebrew")
134 #+mule "japanese" 135 (when-feature mule "japanese")
135 #+mule "korean" 136 (when-feature mule "korean")
136 #+mule "misc-lang" 137 (when-feature mule "misc-lang")
137 ;; #+mule "thai" 138 ;; (when-feature mule "thai")
138 #+mule "viet-chars" 139 (when-feature mule "viet-chars")
139 ;; #+mule "vietnamese" 140 ;; (when-feature mule "vietnamese")
140 141
141 ;; Specialized language support 142 ;; Specialized language support
142 #+(and mule CANNA) "canna-leim" 143 (when-feature (and mule CANNA) "canna-leim")
143 ;; Egg/Its is now a package 144 ;; Egg/Its is now a package
144 ; #+(and mule wnn) "egg-leim" 145 ; (when-feature (and mule wnn) "egg-leim")
145 ; #+(and mule wnn) "egg-kwnn-leim" 146 ; (when-feature (and mule wnn) "egg-kwnn-leim")
146 ; #+(and mule wnn) "egg-cwnn-leim" 147 ; (when-feature (and mule wnn) "egg-cwnn-leim")
147 ; #+mule "egg-sj3-leim" 148 ; (when-feature mule "egg-sj3-leim")
148 ;; SKK is now a package 149 ;; SKK is now a package
149 ; #+mule "skk-leim" 150 ; (when-feature mule "skk-leim")
150 151
151 ;; Set up the XEmacs environment for Mule. 152 ;; Set up the XEmacs environment for Mule.
152 ;; Assumes the existence of various stuff above. 153 ;; Assumes the existence of various stuff above.
153 #+mule "mule-init" 154 (when-feature mule "mule-init")
154 155
155 ;; Enable Mule capability for Gnus, mail, etc... 156 ;; Enable Mule capability for Gnus, mail, etc...
156 ;; Moved to sunpro-load.el - the default only for Sun. 157 ;; Moved to sunpro-load.el - the default only for Sun.
157 ;;(pureload "mime-setup") 158 ;;(pureload "mime-setup")
158 ;;; mule-load.el ends here 159 ;;; mule-load.el ends here
159 #+window-system "gui" 160 (when-feature window-system "gui")
160 #+window-system "mode-motion" 161 (when-feature window-system "mode-motion")
161 #+window-system "mouse" 162 (when-feature window-system "mouse")
162 #+window-system "select" 163 (when-feature window-system "select")
163 #+dragdrop-api "dragdrop" 164 (when-feature dragdrop-api "dragdrop")
164 ;; preload the X code, for faster startup. 165 ;; preload the X code, for faster startup.
165 #+(and (not infodock) (or x mswindows) menubar) "menubar-items" 166 (when-feature (and (not infodock)
166 #+(and infodock (or x mswindows) menubar) "id-menus" 167 (or x mswindows) menubar) "menubar-items")
167 #+x "x-faces" 168 (when-feature (and infodock (or x mswindows) menubar) "id-menus")
168 #+x "x-iso8859-1" 169 (when-feature x "x-faces")
169 #+x "x-mouse" 170 (when-feature x "x-iso8859-1")
170 #+x "x-select" 171 (when-feature x "x-mouse")
171 #+(and x scrollbar) "x-scrollbar" 172 (when-feature x "x-select")
172 #+x "x-misc" 173 (when-feature (and x scrollbar) "x-scrollbar")
173 #+x "x-init" 174 (when-feature x "x-misc")
174 #+(and (not infodock) window-system toolbar) "toolbar-items" 175 (when-feature x "x-init")
175 #+x "x-win-xfree86" 176 (when-feature (and (not infodock)
176 #+x "x-win-sun" 177 window-system toolbar) "toolbar-items")
178 (when-feature x "x-win-xfree86")
179 (when-feature x "x-win-sun")
177 ;; preload the mswindows code. 180 ;; preload the mswindows code.
178 #+mswindows "msw-glyphs" 181 (when-feature mswindows "msw-glyphs")
179 #+mswindows "msw-faces" 182 (when-feature mswindows "msw-faces")
180 #+mswindows "msw-mouse" 183 (when-feature mswindows "msw-mouse")
181 #+mswindows "msw-init" 184 (when-feature mswindows "msw-init")
182 #+mswindows "msw-select" 185 (when-feature mswindows "msw-select")
183 ;; preload the TTY init code. 186 ;; preload the TTY init code.
184 #+tty "tty-init" 187 (when-feature tty "tty-init")
185 ;;; Formerly in tooltalk/tooltalk-load.el 188 ;;; Formerly in tooltalk/tooltalk-load.el
186 ;; Moved to tooltalk package 189 ;; Moved to tooltalk package
187 ;; #+tooltalk "tooltalk-macros" 190 ;; (when-feature tooltalk "tooltalk-macros")
188 ;; #+tooltalk "tooltalk-util" 191 ;; (when-feature tooltalk "tooltalk-util")
189 ;; #+tooltalk "tooltalk-init" 192 ;; (when-feature tooltalk "tooltalk-init")
190 ;; "vc-hooks" ; Packaged. Available in two versions. 193 ;; "vc-hooks" ; Packaged. Available in two versions.
191 ;; "ediff-hook" ; Packaged. 194 ;; "ediff-hook" ; Packaged.
192 "fontl-hooks" 195 "fontl-hooks"
193 "auto-show" 196 "auto-show"
194 #+ldap "ldap" 197 (when-feature ldap "ldap")
195 198
196 ;; #+energize "energize/energize-load.el" 199 ;; (when-feature energize "energize/energize-load.el")
197 ;;; formerly in sunpro/sunpro-load.el 200 ;;; formerly in sunpro/sunpro-load.el
198 ;; #+(and mule sparcworks) "mime-setup" 201 ;; (when-feature (and mule sparcworks) "mime-setup")
199 202
200 ;; Moved to Sun package 203 ;; Moved to Sun package
201 ;; #+sparcworks "cc-mode" ; Requires cc-mode package 204 ;; (when-feature sparcworks "cc-mode") ; Requires cc-mode package
202 ;; #+sparcworks "sunpro-init" 205 ;; (when-feature sparcworks "sunpro-init")
203 ;; #+sparcworks "ring" 206 ;; (when-feature sparcworks "ring")
204 ;; #+sparcworks "comint" ; Requires comint package 207 ;; (when-feature sparcworks "comint") ; Requires comint package
205 ;; #+sparcworks "annotations" 208 ;; (when-feature sparcworks "annotations")
206 209
207 ;;; formerly in eos/sun-eos-load.el 210 ;;; formerly in eos/sun-eos-load.el
208 ;; #+sparcworks "sun-eos-init" 211 ;; (when-feature sparcworks "sun-eos-init")
209 ;; #+sparcworks "sun-eos-common" 212 ;; (when-feature sparcworks "sun-eos-common")
210 ;; #+sparcworks "sun-eos-editor" 213 ;; (when-feature sparcworks "sun-eos-editor")
211 ;; #+sparcworks "sun-eos-browser" 214 ;; (when-feature sparcworks "sun-eos-browser")
212 ;; #+sparcworks "sun-eos-debugger" 215 ;; (when-feature sparcworks "sun-eos-debugger")
213 ;; #+sparcworks "sun-eos-debugger-extra" 216 ;; (when-feature sparcworks "sun-eos-debugger-extra")
214 ;; #+sparcworks "sun-eos-menubar" 217 ;; (when-feature sparcworks "sun-eos-menubar")
215 "loadhist" ; Must be dumped before loaddefs is loaded 218 "loadhist" ; Must be dumped before loaddefs is loaded
216 "loaddefs" ; <=== autoloads get loaded here 219 "loaddefs" ; <=== autoloads get loaded here
217 )) 220 ))