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