+
(setq preloaded-file-list
(assemble-list
"backquote" ; needed for defsubst etc.
"bytecomp-runtime" ; define defsubst
- "Installation.el"
"find-paths"
"packages" ; Bootstrap run-time lisp environment
"setup-paths"
"events"
"text-props"
"process" ;; This is bad. network-streams may not be defined.
- (when-feature multicast "multicast") ; #+network-streams implicitely true
+ (when-feature multicast "multicast") ; #+network-streams implicitly true
"frame" ; move up here cause some stuff needs it here
"map-ynp"
"simple"
;; After fixing, eos/loaddefs-eos and loaddefs appear identical?!!
;; So just make loaddefs-eos go away...
;;(pureload (if (featurep 'sparcworks) "eos/loaddefs-eos" "loaddefs"))
+ "cus-file"
"startup" ; For initialization of
; `emacs-user-extension-dir'
"misc"
"text-mode"
"fill"
"auto-save" ; Added for 20.4
-
- (when-feature windows-nt "winnt")
+ "movemail" ; Added for 21.2
+ (when-feature windows-nt "win32-native")
(when-feature lisp-float-type "float-sup")
"itimer" ; for vars auto-save-timeout and
; auto-gc-threshold
"itimer-autosave"
+ "printer"
+
+ ;;;;;;;;;;;;;;;;;; GUI support
+ (when-feature window-system "gui")
+ (when-feature window-system "mouse")
+ (when-feature window-system "mode-motion")
(when-feature toolbar "toolbar")
(when-feature scrollbar "scrollbar")
(when-feature menubar "menubar")
(when-feature dialog "dialog")
- (when-feature mule "mule-charset")
+ (when-feature gutter "gutter")
+ (when-feature dragdrop-api "dragdrop")
+ "select"
+
+ ;;;;;;;;;;;;;;;;;; Content for GUI's
+ ;; There used to be window-system inserted in the when-feature,
+ ;; but IMHO your configure script should turn off the menubar,
+ ;; toolbar, etc. features when there is no window system. We
+ ;; should just be able to assume that, if (featurep 'menubar),
+ ;; the menubar should work and if items are added, they can be
+ ;; seen clearly and usefully.
+ (when-feature (and (not infodock) menubar) "menubar-items")
+ (when-feature (and gutter) "gutter-items")
+ (when-feature (and (not infodock) toolbar) "toolbar-items")
+ (when-feature (and (not infodock) dialog) "dialog-items")
+
+ ;;;;;;;;;;;;;;;;;; Coding-system support
(when-feature file-coding "coding")
- (when-feature mule "mule-coding")
-;; Handle I/O of files with extended characters.
(when-feature file-coding "code-files")
- (when-feature mule "mule-files")
-;; Handle process with encoding/decoding non-ascii coding-system.
+ ;; Handle process with encoding/decoding coding-system.
(when-feature file-coding "code-process")
+ ;; Provide basic commands to set coding systems to user
+ (when-feature file-coding "code-cmds")
+ ;;;;;;;;;;;;;;;;;; MULE support
+ (when-feature mule "mule-conf")
+ (when-feature mule "arabic")
+ (when-feature utf-2000 "update-cdb")
+ (when-feature mule "mule-charset")
+ (when-feature mule "mule-coding")
+ ;; All files after this can have extended characters in them.
(when-feature mule "mule-help")
-;; Load the remaining basic files.
(when-feature mule "mule-category")
(when-feature mule "mule-ccl")
(when-feature mule "mule-misc")
;; Now load files to set up all the different languages/environments
;; that Mule knows about.
- (when-feature mule "arabic")
(when-feature mule "chinese")
- (when-feature mule "mule-base/cyrillic") ; overloaded in leim/quail
+ (when-feature mule "mule/cyrillic") ; overloaded in leim/quail
(when-feature mule "english")
-;; (when-feature mule "ethiopic")
+ (when-feature mule "ethiopic")
(when-feature mule "european")
- (when-feature mule "mule-base/greek") ; overloaded in leim/quail
+ (when-feature mule "mule/greek") ; overloaded in leim/quail
(when-feature mule "hebrew")
(when-feature mule "japanese")
(when-feature mule "korean")
(when-feature mule "misc-lang")
-;; (when-feature mule "thai")
+ (when-feature mule "thai-xtis-chars")
+ (when-feature mule "mule/thai-xtis") ; overloaded in leim/quail
(when-feature mule "viet-chars")
-;; (when-feature mule "vietnamese")
+ (when-feature (and mule (not utf-2000)) "viet-ccl")
+ (when-feature mule "vietnamese")
;; Specialized language support
(when-feature (and mule CANNA) "canna-leim")
;; Moved to sunpro-load.el - the default only for Sun.
;;(pureload "mime-setup")
;;; mule-load.el ends here
- (when-feature window-system "gui")
- (when-feature window-system "mode-motion")
- (when-feature window-system "mouse")
- (when-feature window-system "select")
- (when-feature dragdrop-api "dragdrop")
-;; preload the X code, for faster startup.
- (when-feature (and (not infodock)
- (or x mswindows) menubar) "menubar-items")
+
+;; preload InfoDock stuff. should almost certainly not be here if
+;; id-menus is not here. infodock needs to figure out a clever way to
+;; advise this stuff or we need to export a clean way for infodock or
+;; others to control this programmatically.
(when-feature (and infodock (or x mswindows) menubar) "id-menus")
+;; preload the X code.
(when-feature x "x-faces")
(when-feature x "x-iso8859-1")
(when-feature x "x-mouse")
(when-feature (and x scrollbar) "x-scrollbar")
(when-feature x "x-misc")
(when-feature x "x-init")
- (when-feature (and (not infodock)
- window-system toolbar) "toolbar-items")
(when-feature x "x-win-xfree86")
(when-feature x "x-win-sun")
;; preload the mswindows code.
;; (when-feature sparcworks "sun-eos-debugger")
;; (when-feature sparcworks "sun-eos-debugger-extra")
;; (when-feature sparcworks "sun-eos-menubar")
+ ;; (when-feature utf-2000 "make-cdbs")
+ (when-feature utf-2000 "close-cdb")
"loadhist" ; Must be dumped before loaddefs is loaded
"loaddefs" ; <=== autoloads get loaded here
))