diff options
| author | Daniel Colascione <dancol@dancol.org> | 2019-01-15 18:42:39 -0500 |
|---|---|---|
| committer | Daniel Colascione <dancol@dancol.org> | 2019-01-15 18:42:39 -0500 |
| commit | 6b9fa8804533a695094a930d634d2d6617e2b6c7 (patch) | |
| tree | 469f017265239d1d217049f8425e6abc943fbc0e /lisp/loadup.el | |
| parent | 02976d67369699660add46d548f0d1593885334b (diff) | |
| download | emacs-6b9fa8804533a695094a930d634d2d6617e2b6c7.tar.gz | |
Make sure dump-mode is nil after dump
* lisp/loadup.el (dump-mode): Bind dump-mode to nil before dumping
Diffstat (limited to 'lisp/loadup.el')
| -rw-r--r-- | lisp/loadup.el | 5 |
1 files changed, 3 insertions, 2 deletions
diff --git a/lisp/loadup.el b/lisp/loadup.el index 0f0ca15cebc..100c3f700d1 100644 --- a/lisp/loadup.el +++ b/lisp/loadup.el @@ -488,8 +488,9 @@ lost after dumping"))) ;; same as invocation-directory. (let (success) (unwind-protect - (progn - (if (member dump-mode '("pdump" "pbootstrap")) + (let ((tmp-dump-mode dump-mode) + (dump-mode nil)) + (if (member tmp-dump-mode '("pdump" "pbootstrap")) (dump-emacs-portable (expand-file-name output invocation-directory)) (dump-emacs output "temacs") (message "%d pure bytes used" pure-bytes-used)) |