X-Git-Url: http://git.chise.org/gitweb/?a=blobdiff_plain;f=lisp%2Fdumped-lisp.el;h=73dea3642f7d30ba42b2836575218caf5bb850d5;hb=8b6a943578dd26817b7514ccb0c19119c314ec60;hp=9c8a2ba84902ebec6430b0d2a4a49956110b0134;hpb=06557f5853942cd2ab6dcd966c6f3c881ede2e9b;p=chise%2Fxemacs-chise.git- diff --git a/lisp/dumped-lisp.el b/lisp/dumped-lisp.el index 9c8a2ba..73dea36 100644 --- a/lisp/dumped-lisp.el +++ b/lisp/dumped-lisp.el @@ -33,7 +33,7 @@ "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" @@ -50,6 +50,7 @@ ;; 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" @@ -86,6 +87,7 @@ "itimer" ; for vars auto-save-timeout and ; auto-gc-threshold "itimer-autosave" + "printer" (when-feature toolbar "toolbar") (when-feature scrollbar "scrollbar") (when-feature menubar "menubar") @@ -388,7 +390,7 @@ (when-feature utf-2000 "u0FE70-Arabic-Presentation-Forms-B") (when-feature utf-2000 "u0FF00-Halfwidth-and-Fullwidth-Forms") (when-feature utf-2000 "u0FFF0-Specials") - (when-feature utf-2000 "mojikyo") + ;; (when-feature utf-2000 "mojikyo") (when-feature utf-2000 "ccs-tcvn5712.el") (when-feature mule "mule-charset") (when-feature file-coding "coding") @@ -458,16 +460,17 @@ ;; Moved to sunpro-load.el - the default only for Sun. ;;(pureload "mime-setup") ;;; mule-load.el ends here + (when-feature (and gutter window-system) "gutter") (when-feature window-system "gui") (when-feature window-system "mode-motion") (when-feature window-system "mouse") - (when-feature window-system "select") + "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 (and gutter window-system) "gutter-items") (when-feature x "x-faces") (when-feature x "x-iso8859-1") (when-feature x "x-mouse")