|
169
|
1 (setq dumped-lisp-packages
|
|
|
2 '("backquote" ; needed for defsubst etc.
|
|
|
3 "bytecomp-runtime" ; define defsubst
|
|
177
|
4 "packages" ; Bootstrap run-time lisp environment
|
|
169
|
5 "subr" ; load the most basic Lisp functions
|
|
|
6 "replace" ; match-string used in version.el.
|
|
|
7 "version.el" ; Ignore compiled-by-mistake version.elc
|
|
|
8 "cl"
|
|
187
|
9 ;; "cl-extra" ; These cause lossage at dump
|
|
|
10 ;; "cl-seq" ; Fix it first, if you want these dumped
|
|
169
|
11 ;;"featurep"
|
|
|
12 "widget"
|
|
|
13 "custom" ; Before the world so everything can be
|
|
|
14 ; customized
|
|
|
15 "cus-start" ; for customization of builtin variables
|
|
|
16 "cmdloop"
|
|
|
17 ;; (or (fboundp 'recursive-edit) (load-gc "cmdloop1"))
|
|
|
18 "keymap"
|
|
|
19 "syntax"
|
|
|
20 "device"
|
|
|
21 "console"
|
|
|
22 "obsolete"
|
|
|
23 "specifier"
|
|
|
24 "faces" ; must be loaded before any make-face call
|
|
163
|
25 ;;(load-gc "facemenu") #### not yet ported
|
|
169
|
26 "glyphs"
|
|
|
27 "objects"
|
|
|
28 "extents"
|
|
|
29 "events"
|
|
|
30 "text-props"
|
|
|
31 "process"
|
|
|
32 "frame" ; move up here cause some stuff needs it here
|
|
|
33 "map-ynp"
|
|
|
34 "simple"
|
|
|
35 "keydefs" ; Before loaddefs so that keymap vars exist.
|
|
|
36 "abbrev"
|
|
|
37 "derived"
|
|
|
38 "minibuf"
|
|
|
39 "list-mode"
|
|
|
40 "modeline" ; needs simple.el to be loaded first
|
|
163
|
41 ;; If SparcWorks support is included some additional packages are
|
|
|
42 ;; dumped which would normally have autoloads. To avoid
|
|
|
43 ;; duplicate doc string warnings, SparcWorks uses a separate
|
|
|
44 ;; autoloads file with the dumped packages removed.
|
|
|
45 ;; After fixing, eos/loaddefs-eos and loaddefs appear identical?!!
|
|
|
46 ;; So just make loaddefs-eos go away...
|
|
|
47 ;;(load-gc (if (featurep 'sparcworks) "eos/loaddefs-eos" "loaddefs"))
|
|
173
|
48 "startup" ; For initialization of
|
|
|
49 ; `emacs-user-extension-dir'
|
|
169
|
50 "loaddefs" ; <=== autoloads get loaded here
|
|
|
51 "misc"
|
|
|
52 ;; (load-gc "profile")
|
|
|
53 "help"
|
|
|
54 ;; (load-gc "hyper-apropos") Soon...
|
|
|
55 #-mule "files-nomule"
|
|
|
56 "files"
|
|
|
57 "lib-complete"
|
|
|
58 "format"
|
|
|
59 "indent"
|
|
|
60 "isearch-mode"
|
|
|
61 "buffer"
|
|
|
62 "buff-menu"
|
|
|
63 "undo-stack"
|
|
|
64 "window"
|
|
|
65 "window-xemacs"
|
|
|
66 "paths.el" ; don't get confused if paths compiled.
|
|
|
67 "lisp"
|
|
|
68 "page"
|
|
|
69 "register"
|
|
|
70 "iso8859-1" ; This must be before any modes
|
|
|
71 ; (sets standard syntax table.)
|
|
|
72 "paragraphs"
|
|
|
73 "easymenu" ; Added for 20.3.
|
|
|
74 "lisp-mode"
|
|
|
75 "text-mode"
|
|
|
76 "fill"
|
|
|
77 ;; "cc-mode" ; as FSF goes so go we ..
|
|
|
78 ;; "scroll-in-place" ; We're not ready for this :-(
|
|
|
79 ;; we no longer load buff-menu automatically.
|
|
|
80 ;; it will get autoloaded if needed.
|
|
163
|
81
|
|
169
|
82 ;; Before this will work again, the different system types will need
|
|
|
83 ;; to have features named for them.
|
|
163
|
84
|
|
|
85 ; (cond ; Differences based on system-type
|
|
|
86 ; ((eq system-type 'vax-vms)
|
|
|
87 ; (load-gc "vmsproc")
|
|
|
88 ; (load-gc "vms-patch"))
|
|
|
89 ; ((eq system-type 'windows-nt)
|
|
|
90 ; ;; (load-gc "ls-lisp")
|
|
169
|
91 #+windows-nt "winnt"
|
|
163
|
92 ; ((eq system-type 'ms-dos)
|
|
|
93 ; ;; (load-gc "ls-lisp")
|
|
|
94 ; (load-gc "dos-fns")
|
|
|
95 ; (load-gc "disp-table"))) ; needed to setup ibm-pc char set,
|
|
|
96 ; see internal.el
|
|
169
|
97 #+lisp-float-type "float-sup"
|
|
|
98 "itimer" ; for vars auto-save-timeout and
|
|
|
99 ; auto-gc-threshold
|
|
|
100 "itimer-autosave"
|
|
|
101 #+toolbar "toolbar"
|
|
163
|
102 ; ;; else still define a few functions.
|
|
|
103 ; (defun toolbar-button-p (obj) "No toolbar support." nil)
|
|
|
104 ; (defun toolbar-specifier-p (obj) "No toolbar support." nil))
|
|
169
|
105 #+scrollbar "scrollbar"
|
|
|
106 #+menubar "menubar"
|
|
|
107 #+dialog "dialog"
|
|
|
108 #+mule "mule-charset"
|
|
|
109 #+mule "mule-coding"
|
|
163
|
110 ;; Handle I/O of files with extended characters.
|
|
169
|
111 #+mule "mule-files"
|
|
163
|
112 ;; Load the remaining basic files.
|
|
169
|
113 #+mule "mule-category"
|
|
|
114 #+mule "mule-ccl"
|
|
|
115 #+mule "mule-misc"
|
|
|
116 #+mule "kinsoku"
|
|
|
117 #+(and mule x) "mule-x-init"
|
|
|
118 #+mule "mule-cmds" ; to sync with Emacs 20.1
|
|
163
|
119
|
|
|
120 ;; after this goes the specific lisp routines for a particular input system
|
|
|
121 ;; 97.2.5 JHod Shouldn't these go into a site-load file to allow site
|
|
|
122 ;; or user switching of input systems???
|
|
|
123 ;(if (featurep 'wnn)
|
|
|
124 ; (progn
|
|
|
125 ; (load-gc "egg")
|
|
|
126 ; (load-gc "egg-wnn")
|
|
|
127 ; (setq egg-default-startup-file "eggrc-wnn")))
|
|
|
128
|
|
|
129 ;; (if (and (boundp 'CANNA) CANNA)
|
|
|
130 ;; (load-gc "canna")
|
|
|
131 ;; )
|
|
|
132
|
|
|
133 ;; Now load files to set up all the different languages/environments
|
|
|
134 ;; that Mule knows about.
|
|
|
135
|
|
169
|
136 #+mule "language/arabic"
|
|
|
137 #+mule "language/chinese"
|
|
|
138 #+mule "language/cyrillic"
|
|
|
139 #+mule "language/english"
|
|
|
140 #+mule "language/ethiopic"
|
|
|
141 #+mule "language/european"
|
|
|
142 #+mule "language/greek"
|
|
|
143 #+mule "hebrew-hooks"
|
|
|
144 #+mule "language/japanese"
|
|
|
145 #+mule "language/korean"
|
|
|
146 #+mule "language/misc-lang"
|
|
|
147 #+mule "language/thai"
|
|
|
148 #+mule "vietnamese-hooks-1"
|
|
|
149 #+mule "vietnamese-hooks-2"
|
|
163
|
150
|
|
|
151 ;; Set up the XEmacs environment for Mule.
|
|
|
152 ;; Assumes the existence of various stuff above.
|
|
169
|
153 #+mule "mule-init"
|
|
163
|
154
|
|
|
155 ;; Enable Mule capability for Gnus, mail, etc...
|
|
|
156 ;; Moved to sunpro-load.el - the default only for Sun.
|
|
|
157 ;;(load-gc "mime-setup")
|
|
|
158 ;;; mule-load.el ends here
|
|
169
|
159 #+window-system "gui"
|
|
|
160 #+window-system "mode-motion"
|
|
|
161 #+window-system "mouse"
|
|
163
|
162 ;; preload the X code, for faster startup.
|
|
169
|
163 #+(and x menubar) "x-menubar"
|
|
|
164 #+x "x-faces"
|
|
|
165 #+x "x-iso8859-1"
|
|
|
166 #+x "x-mouse"
|
|
|
167 #+x "x-select"
|
|
|
168 #+(and x scrollbar) "x-scrollbar"
|
|
|
169 #+x "x-misc"
|
|
|
170 #+x "x-init"
|
|
|
171 #+(and x toolbar) "x-toolbar"
|
|
163
|
172 ;; preload the TTY init code.
|
|
169
|
173 #+tty "tty-init"
|
|
163
|
174 ;;; Formerly in tooltalk/tooltalk-load.el
|
|
169
|
175 #+tooltalk "tooltalk/tooltalk-macros"
|
|
|
176 #+tooltalk "tooltalk/tooltalk-util"
|
|
|
177 #+tooltalk "tooltalk/tooltalk-init"
|
|
|
178 "vc-hooks"
|
|
|
179 "ediff-hook"
|
|
|
180 "fontl-hooks"
|
|
|
181 "auto-show"
|
|
163
|
182 ;; #+energize "energize/energize-load.el"
|
|
|
183 ;;; formerly in sunpro/sunpro-load.el
|
|
187
|
184 ;; #+(and mule sparcworks) "mime-setup"
|
|
169
|
185 #+sparcworks "cc-mode"
|
|
|
186 #+sparcworks "sunpro-init"
|
|
|
187 #+sparcworks "ring"
|
|
|
188 #+sparcworks "comint"
|
|
|
189 #+sparcworks "annotations"
|
|
163
|
190 ;;; formerly in eos/sun-eos-load.el
|
|
187
|
191 ;; #+sparcworks "sun-eos-init"
|
|
|
192 ;; #+sparcworks "sun-eos-common"
|
|
|
193 ;; #+sparcworks "sun-eos-editor"
|
|
|
194 ;; #+sparcworks "sun-eos-browser"
|
|
|
195 ;; #+sparcworks "sun-eos-debugger"
|
|
|
196 ;; #+sparcworks "sun-eos-debugger-extra"
|
|
|
197 ;; #+sparcworks "sun-eos-menubar"
|
|
163
|
198 ))
|
