cgit.sxemacs.org Git - sxemacs/blob - lisp/dumped-lisp.el

   1 (defvar packages-hardcoded-lisp
   2   '(
   3     ;; Nothing at this time
   4     )
   5   "Lisp packages that are always dumped with XEmacs.
   6 This includes every package that is loaded directly by a package listed
   7 in dumped-lisp.el and is not itself listed.")
   8
   9 (setq preloaded-file-list
  10       (assemble-list
  11         "backquote"             ; needed for defsubst etc.
  12         "bytecomp-runtime"      ; define defsubst
  13         "find-paths"
  14         "packages"              ; Bootstrap run-time lisp environment
  15         "setup-paths"
  16         "dump-paths"
  17         "subr"                  ; load the most basic Lisp functions
  18         "replace"               ; match-string used in version.el.
  19         ; Ignore compiled-by-mistake version.elc
  20         "version.el"
  21         "cl"
  22         "cl-extra"
  23         "cl-seq"
  24         "widget"
  25         "custom"                ; Before the world so everything can be
  26                                 ; customized
  27         "cus-start"             ; for customization of builtin variables
  28         "cmdloop"
  29         "keymap"
  30         "syntax"
  31         "device"
  32         "console"
  33         "obsolete"
  34         "specifier"
  35         "faces"                 ; must be loaded before any make-face call
  36 ;;(pureload "facemenu") #### not yet ported
  37         "glyphs"
  38         "objects"
  39         "extents"
  40         "events"
  41         "text-props"
  42         "process" ;; This is bad. network-streams may not be defined.
  43         (when-feature multicast "multicast") ; #+network-streams implicitly true
  44         "frame"                 ; move up here cause some stuff needs it here
  45         "map-ynp"
  46         "undo-stack"
  47         "window"
  48         "window-xemacs"
  49         "resize-minibuffer"     ; Needed by simple
  50         "simple"
  51         "keydefs"               ; Before loaddefs so that keymap vars exist.
  52         "abbrev"
  53         "number"
  54         "derived"
  55         "minibuf"
  56         "list-mode"
  57         "modeline"              ; needs simple.el to be loaded first
  58 ;; If SparcWorks support is included some additional packages are
  59 ;; dumped which would normally have autoloads.  To avoid
  60 ;; duplicate doc string warnings, SparcWorks uses a separate
  61 ;; autoloads file with the dumped packages removed.
  62 ;; After fixing, eos/loaddefs-eos and loaddefs appear identical?!!
  63 ;; So just make loaddefs-eos go away...
  64 ;;(pureload (if (featurep 'sparcworks) "eos/loaddefs-eos" "loaddefs"))
  65         "cus-file"
  66         "startup"               ; For initialization of
  67                                 ;  `emacs-user-extension-dir'
  68         "lisp-initd"
  69         "misc"
  70         "loadhist"              ; Must be dumped before loaddefs is loaded
  71                                 ; Used by help.
  72         ;; (pureload "profile")
  73         (unless-feature mule "help-nomule")
  74         "help"
  75         ;; (pureload "hyper-apropos")  Soon...
  76         (unless-feature file-coding "files-nomule")
  77         "files"
  78         "lib-complete"
  79         (when-feature modules "emod-utils")
  80         "format"
  81         "indent"
  82         "isearch-mode"
  83         "buffer"
  84         "buff-menu"
  85         "paths.el"              ; don't get confused if paths compiled.
  86         "lisp"
  87         "page"
  88         "register"
  89         "iso8859-1"             ; This must be before any modes
  90                                         ; (sets standard syntax table.)
  91         "paragraphs"
  92         "easymenu"              ; Added for 20.3.
  93         "lisp-mode"
  94         "text-mode"
  95         "fill"
  96         "auto-save"             ; Added for 20.4
  97         "movemail"              ; Added for 21.2
  98         (when-feature lisp-float-type "float-sup")
  99         "itimer"                ; for vars auto-save-timeout and
 100                                 ; auto-gc-threshold
 101         "itimer-autosave"
 102         "printer"
 103
 104         ;;;;;;;;;;;;;;;;;; GUI support
 105         (when-feature window-system "gui")
 106         (when-feature window-system "mouse")
 107         (when-feature window-system "mode-motion")
 108         (when-feature toolbar "toolbar")
 109         (when-feature scrollbar "scrollbar")
 110         (when-feature menubar "menubar")
 111         (when-feature dialog "dialog")
 112         (when-feature gutter "gutter")
 113         (when-feature dragdrop-api "dragdrop")
 114         "select"
 115
 116         ;;;;;;;;;;;;;;;;;; Content for GUI's
 117         ;; There used to be window-system inserted in the when-feature,
 118         ;; but IMHO your configure script should turn off the menubar,
 119         ;; toolbar, etc. features when there is no window system.  We
 120         ;; should just be able to assume that, if (featurep 'menubar),
 121         ;; the menubar should work and if items are added, they can be
 122         ;; seen clearly and usefully.
 123         (when-feature (and (not infodock) menubar) "menubar-items")
 124         (when-feature (and gutter) "gutter-items")
 125         (when-feature (and (not infodock) toolbar) "toolbar-items")
 126         (when-feature (and (not infodock) dialog) "dialog-items")
 127
 128         ;;;;;;;;;;;;;;;;;; Coding-system support
 129         (when-feature file-coding "coding")
 130         (when-feature file-coding "code-files")
 131         ;; Handle process with encoding/decoding coding-system.
 132         (when-feature file-coding "code-process")
 133         ;; Provide basic commands to set coding systems to user
 134         (when-feature file-coding "code-cmds")
 135         ;;;;;;;;;;;;;;;;;; MULE support
 136         (when-feature mule "mule-charset")
 137         (when-feature mule "mule-coding")
 138         ;; All files after this can have extended characters in them.
 139         (when-feature mule "mule-help")
 140         (when-feature mule "mule-category")
 141         (when-feature mule "mule-misc")
 142         (when-feature mule "kinsoku")
 143         (when-feature (and mule x) "mule-x-init")
 144         (when-feature (and mule tty) "mule-tty-init")
 145         (when-feature mule "mule-cmds") ; to sync with Emacs 20.1
 146
 147 ;; after this goes the specific lisp routines for a particular input system
 148 ;; 97.2.5 JHod Shouldn't these go into a site-load file to allow site
 149 ;; or user switching of input systems???
 150 ;(if (featurep 'wnn)
 151 ;    (progn
 152 ;      (pureload "egg")
 153 ;      (pureload "egg-wnn")
 154 ;      (setq egg-default-startup-file "eggrc-wnn")))
 155
 156 ;; (if (and (boundp 'CANNA) CANNA)
 157 ;;     (pureload "canna")
 158 ;;   )
 159
 160 ;; Now load files to set up all the different languages/environments
 161 ;; that Mule knows about.
 162
 163         (when-feature mule "arabic")
 164         (when-feature mule "chinese")
 165         (when-feature mule "mule/cyrillic") ; overloaded in leim/quail
 166         (when-feature mule "english")
 167         (when-feature mule "ethiopic")
 168         (when-feature mule "european")
 169         (when-feature mule "mule/greek") ; overloaded in leim/quail
 170         (when-feature mule "hebrew")
 171         (when-feature mule "japanese")
 172         (when-feature mule "korean")
 173         (when-feature mule "latin")
 174         (when-feature mule "misc-lang")
 175         (when-feature mule "thai-xtis-chars")
 176         (when-feature mule "mule/thai-xtis") ; overloaded in leim/quail
 177         (when-feature mule "viet-chars")
 178         (when-feature mule "vietnamese")
 179
 180         ;; Specialized language support
 181         (when-feature (and mule CANNA) "canna-leim")
 182 ;; Egg/Its is now a package
 183 ;       (when-feature (and mule wnn) "egg-leim")
 184 ;       (when-feature (and mule wnn) "egg-kwnn-leim")
 185 ;       (when-feature (and mule wnn) "egg-cwnn-leim")
 186 ;       (when-feature mule "egg-sj3-leim")
 187 ;; SKK is now a package
 188 ;       (when-feature mule "skk-leim")
 189
 190 ;; Set up the XEmacs environment for Mule.
 191 ;; Assumes the existence of various stuff above.
 192         (when-feature mule "mule-init")
 193
 194 ;; Enable Mule capability for Gnus, mail, etc...
 195 ;; Moved to sunpro-load.el - the default only for Sun.
 196 ;;(pureload "mime-setup")
 197 ;;; mule-load.el ends here
 198
 199 ;; preload InfoDock stuff.  should almost certainly not be here if
 200 ;; id-menus is not here.  infodock needs to figure out a clever way to
 201 ;; advise this stuff or we need to export a clean way for infodock or
 202 ;; others to control this programmatically.
 203         (when-feature (and infodock x menubar) "id-menus")
 204 ;; preload the X code.
 205         (when-feature x "x-faces")
 206         (when-feature x "x-iso8859-1")
 207         (when-feature x "x-mouse")
 208         (when-feature x "x-select")
 209         (when-feature (and x scrollbar) "x-scrollbar")
 210         (when-feature x "x-misc")
 211         (when-feature x "x-init")
 212         (when-feature x "x-win-xfree86")
 213         (when-feature x "x-win-sun")
 214
 215 ;; preload the TTY init code.
 216         (when-feature tty "tty-init")
 217         "x-color"
 218         "cus-face"
 219         "font-lock"
 220         "fontl-hooks"
 221         "auto-show"
 222         (when-feature ldap "ldap")
 223
 224         "loaddefs"              ; <=== autoloads get loaded here
 225 ))