dump: improve messages feedback when dumping

This commit is contained in:
syl20bnr 2018-05-07 00:34:26 -04:00
parent 9642ee49d4
commit ea1b4815b8

View file

@ -574,18 +574,29 @@ refreshed during the current session."
'(dotspacemacs-configuration-layers) '(dotspacemacs-configuration-layers)
configuration-layer--last-dotspacemacs-configuration-layers-file)) configuration-layer--last-dotspacemacs-configuration-layers-file))
(cond (cond
((or changed-since-last-dump-p (changed-since-last-dump-p
spacemacs-force-dump)
;; dump ;; dump
(configuration-layer//load) (configuration-layer//load)
(when (not (spacemacs-is-dumping-p)) (when dotspacemacs-emacs-pdumper-executable-file
(configuration-layer/message "Layer list has changed since last dump.")
(configuration-layer//dump-emacs))) (configuration-layer//dump-emacs)))
(spacemacs-force-dump
;; force dump
(configuration-layer//load)
(configuration-layer/message (concat "--force-dump passed on the command line, "
"forcing a redump."))
(configuration-layer//dump-emacs))
((spacemacs-is-dumping-p)
;; dumping
(configuration-layer//load)
(configuration-layer/message "Dumping Emacs..."))
((and dotspacemacs-emacs-pdumper-executable-file ((and dotspacemacs-emacs-pdumper-executable-file
(spacemacs-run-from-dump-p)) (spacemacs-run-from-dump-p))
;; dumped ;; dumped
(configuration-layer/message (configuration-layer/message
"Running from a dumped file. Skipping the loading process!")) "Running from a dumped file. Skipping the loading process!"))
(t (t
;; standard loading
(configuration-layer//load) (configuration-layer//load)
(when dotspacemacs-emacs-pdumper-executable-file (when dotspacemacs-emacs-pdumper-executable-file
(configuration-layer/message (configuration-layer/message