[core] less ".el" suffix for support both *.el and *.elc

This commit is contained in:
Lin Sun 2021-12-04 00:00:32 +00:00 committed by Maxi Wolff
parent 4625745a8b
commit 0206197b22
4 changed files with 7 additions and 7 deletions

View File

@ -170,7 +170,7 @@ When universal prefix argument is passed then display the process buffer."
:command :command
(list dotspacemacs-emacs-pdumper-executable-file (list dotspacemacs-emacs-pdumper-executable-file
"--batch" "--batch"
"-l" (concat spacemacs-start-directory "dump-init.el") "-l" (concat spacemacs-start-directory "dump-init")
"-eval" (concat "(dump-emacs-portable \"" dump-file-temp "\")")))) "-eval" (concat "(dump-emacs-portable \"" dump-file-temp "\")"))))
(when (equal '(4) display-buffer) (when (equal '(4) display-buffer)
(pop-to-buffer spacemacs-dump-buffer-name)))) (pop-to-buffer spacemacs-dump-buffer-name))))

View File

@ -2,7 +2,7 @@
(setq spacemacs-dump-mode 'dumping) (setq spacemacs-dump-mode 'dumping)
;; load init.el ;; load init.el
(setq spacemacs-start-directory (file-name-directory load-file-name)) (setq spacemacs-start-directory (file-name-directory load-file-name))
(load (concat spacemacs-start-directory "init.el")) (load (concat spacemacs-start-directory "init"))
;; prepare the dump ;; prepare the dump
(spacemacs/dump-save-load-path) (spacemacs/dump-save-load-path)
;; disable undo-tree to prevent from segfaulting when loading the dump ;; disable undo-tree to prevent from segfaulting when loading the dump

View File

@ -36,7 +36,7 @@
(setq package-enable-at-startup nil) (setq package-enable-at-startup nil)
(load (concat (file-name-directory load-file-name) (load (concat (file-name-directory load-file-name)
"core/core-early-funcs.el") "core/core-early-funcs")
nil (not init-file-debug)) nil (not init-file-debug))
;; Remove GUI elements soon after GUI being initialized to avoid some possible grapical glitches. ;; Remove GUI elements soon after GUI being initialized to avoid some possible grapical glitches.

View File

@ -29,16 +29,16 @@
(defconst emacs-start-time (current-time)) (defconst emacs-start-time (current-time))
(setq gc-cons-threshold 402653184 gc-cons-percentage 0.6) (setq gc-cons-threshold 402653184 gc-cons-percentage 0.6)
(load (concat (file-name-directory load-file-name) (load (concat (file-name-directory load-file-name)
"core/core-versions.el") "core/core-versions")
nil (not init-file-debug)) nil (not init-file-debug))
(load (concat (file-name-directory load-file-name) (load (concat (file-name-directory load-file-name)
"core/core-load-paths.el") "core/core-load-paths")
nil (not init-file-debug)) nil (not init-file-debug))
(load (concat spacemacs-core-directory "core-dumper.el") (load (concat spacemacs-core-directory "core-dumper")
nil (not init-file-debug)) nil (not init-file-debug))
;; Remove compiled core files if they become stale or Emacs version has changed. ;; Remove compiled core files if they become stale or Emacs version has changed.
(load (concat spacemacs-core-directory "core-compilation.el") (load (concat spacemacs-core-directory "core-compilation")
nil (not init-file-debug)) nil (not init-file-debug))
(load spacemacs--last-emacs-version-file t (not init-file-debug)) (load spacemacs--last-emacs-version-file t (not init-file-debug))
(when (or (not (string= spacemacs--last-emacs-version emacs-version)) (when (or (not (string= spacemacs--last-emacs-version emacs-version))