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