Mercurial > hg > xemacs-beta
diff lisp/dumped-lisp.el @ 428:3ecd8885ac67 r21-2-22
Import from CVS: tag r21-2-22
author | cvs |
---|---|
date | Mon, 13 Aug 2007 11:28:15 +0200 |
parents | |
children | 84b14dcb0985 |
line wrap: on
line diff
--- /dev/null Thu Jan 01 00:00:00 1970 +0000 +++ b/lisp/dumped-lisp.el Mon Aug 13 11:28:15 2007 +0200 @@ -0,0 +1,220 @@ +(setq preloaded-file-list + (assemble-list + "backquote" ; needed for defsubst etc. + "bytecomp-runtime" ; define defsubst + "find-paths" + "packages" ; Bootstrap run-time lisp environment + "setup-paths" + "dump-paths" + "subr" ; load the most basic Lisp functions + "replace" ; match-string used in version.el. + ; Ignore compiled-by-mistake version.elc + "version.el" + "cl" + "cl-extra" + "cl-seq" + "widget" + "custom" ; Before the world so everything can be + ; customized + "cus-start" ; for customization of builtin variables + "cmdloop" + "keymap" + "syntax" + "device" + "console" + "obsolete" + "specifier" + "faces" ; must be loaded before any make-face call +;;(pureload "facemenu") #### not yet ported + "glyphs" + "objects" + "extents" + "events" + "text-props" + "process" ;; This is bad. network-streams may not be defined. + (when-feature multicast "multicast") ; #+network-streams implicitely true + "frame" ; move up here cause some stuff needs it here + "map-ynp" + "simple" + "keydefs" ; Before loaddefs so that keymap vars exist. + "abbrev" + "derived" + "minibuf" + "list-mode" + "modeline" ; needs simple.el to be loaded first +;; If SparcWorks support is included some additional packages are +;; dumped which would normally have autoloads. To avoid +;; duplicate doc string warnings, SparcWorks uses a separate +;; autoloads file with the dumped packages removed. +;; After fixing, eos/loaddefs-eos and loaddefs appear identical?!! +;; So just make loaddefs-eos go away... +;;(pureload (if (featurep 'sparcworks) "eos/loaddefs-eos" "loaddefs")) + "startup" ; For initialization of + ; `emacs-user-extension-dir' + "misc" + ;; (pureload "profile") + (unless-feature mule "help-nomule") + "help" + ;; (pureload "hyper-apropos") Soon... + (unless-feature file-coding "files-nomule") + "files" + "lib-complete" + "format" + "indent" + "isearch-mode" + "buffer" + "buff-menu" + "undo-stack" + "window" + "window-xemacs" + "paths.el" ; don't get confused if paths compiled. + "lisp" + "page" + "register" + "iso8859-1" ; This must be before any modes + ; (sets standard syntax table.) + "paragraphs" + "easymenu" ; Added for 20.3. + "lisp-mode" + "text-mode" + "fill" + "auto-save" ; Added for 20.4 + + (when-feature windows-nt "winnt") + (when-feature lisp-float-type "float-sup") + "itimer" ; for vars auto-save-timeout and + ; auto-gc-threshold + "itimer-autosave" + (when-feature toolbar "toolbar") + (when-feature scrollbar "scrollbar") + (when-feature menubar "menubar") + (when-feature dialog "dialog") + (when-feature mule "mule-charset") + (when-feature file-coding "coding") + (when-feature mule "mule-coding") +;; Handle I/O of files with extended characters. + (when-feature file-coding "code-files") +;; Handle process with encoding/decoding non-ascii coding-system. + (when-feature file-coding "code-process") + (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") + (when-feature mule "kinsoku") + (when-feature (and mule x) "mule-x-init") + (when-feature (and mule tty) "mule-tty-init") + (when-feature mule "mule-cmds") ; to sync with Emacs 20.1 + +;; after this goes the specific lisp routines for a particular input system +;; 97.2.5 JHod Shouldn't these go into a site-load file to allow site +;; or user switching of input systems??? +;(if (featurep 'wnn) +; (progn +; (pureload "egg") +; (pureload "egg-wnn") +; (setq egg-default-startup-file "eggrc-wnn"))) + +;; (if (and (boundp 'CANNA) CANNA) +;; (pureload "canna") +;; ) + +;; 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/cyrillic") ; overloaded in leim/quail + (when-feature mule "english") + (when-feature mule "ethiopic") + (when-feature mule "european") + (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-xtis-chars") + (when-feature mule "mule/thai-xtis") ; overloaded in leim/quail + (when-feature mule "viet-chars") + (when-feature mule "vietnamese") + + ;; Specialized language support + (when-feature (and mule CANNA) "canna-leim") +;; Egg/Its is now a package +; (when-feature (and mule wnn) "egg-leim") +; (when-feature (and mule wnn) "egg-kwnn-leim") +; (when-feature (and mule wnn) "egg-cwnn-leim") +; (when-feature mule "egg-sj3-leim") +;; SKK is now a package +; (when-feature mule "skk-leim") + +;; Set up the XEmacs environment for Mule. +;; Assumes the existence of various stuff above. + (when-feature mule "mule-init") + +;; Enable Mule capability for Gnus, mail, etc... +;; 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") + (when-feature (and infodock (or x mswindows) menubar) "id-menus") + (when-feature (and gutter menubar window-system) "gutter-items") + (when-feature x "x-faces") + (when-feature x "x-iso8859-1") + (when-feature x "x-mouse") + (when-feature x "x-select") + (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 mswindows "msw-glyphs") + (when-feature mswindows "msw-faces") + (when-feature mswindows "msw-mouse") + (when-feature mswindows "msw-init") + (when-feature mswindows "msw-select") +;; preload the TTY init code. + (when-feature tty "tty-init") +;;; Formerly in tooltalk/tooltalk-load.el + ;; Moved to tooltalk package + ;; (when-feature tooltalk "tooltalk-macros") + ;; (when-feature tooltalk "tooltalk-util") + ;; (when-feature tooltalk "tooltalk-init") + ;; "vc-hooks" ; Packaged. Available in two versions. + ;; "ediff-hook" ; Packaged. + "fontl-hooks" + "auto-show" + (when-feature ldap "ldap") + +;; (when-feature energize "energize/energize-load.el") +;;; formerly in sunpro/sunpro-load.el +;; (when-feature (and mule sparcworks) "mime-setup") + + ;; Moved to Sun package + ;; (when-feature sparcworks "cc-mode") ; Requires cc-mode package + ;; (when-feature sparcworks "sunpro-init") + ;; (when-feature sparcworks "ring") + ;; (when-feature sparcworks "comint") ; Requires comint package + ;; (when-feature sparcworks "annotations") + +;;; formerly in eos/sun-eos-load.el +;; (when-feature sparcworks "sun-eos-init") +;; (when-feature sparcworks "sun-eos-common") +;; (when-feature sparcworks "sun-eos-editor") +;; (when-feature sparcworks "sun-eos-browser") +;; (when-feature sparcworks "sun-eos-debugger") +;; (when-feature sparcworks "sun-eos-debugger-extra") +;; (when-feature sparcworks "sun-eos-menubar") + "loadhist" ; Must be dumped before loaddefs is loaded + "loaddefs" ; <=== autoloads get loaded here +))