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