[Emacs-diffs] scratch/raeburn-startup a4231c3 4/5: Don't dump artifacts of the dump process.

[Ken Raeburn]

branch: scratch/raeburn-startup
commit a4231c3f29f45e7f7ecdf524dec7254d9c3734ea
Author: Ken Raeburn <address@hidden>
Commit: Ken Raeburn <address@hidden>

    Don't dump artifacts of the dump process.
    
    * lisp/loadup.el: Exclude from dumping any of the variables that are
    let-bound during the dumping process.
---
 lisp/loadup.el | 9 ++++++++-
 1 file changed, 8 insertions(+), 1 deletion(-)

diff --git a/lisp/loadup.el b/lisp/loadup.el
index 1d9102a..ad45f0c 100644
--- a/lisp/loadup.el
+++ b/lisp/loadup.el
@@ -522,7 +522,14 @@ lost after dumping")))
                                      internal--text-quoting-flag
                                      exec-path
                                      process-environment
-                                     command-line-args noninteractive))))
+                                     command-line-args noninteractive
+                                     ;; Any let-bound variables during
+                                     ;; dump process will be useless.
+                                     faces coding-systems coding-system-aliases
+                                     charsets charset-aliases unified-charsets
+                                     abbrev-tables abbrev-counter
+                                     abbrev-make-cmds abbrev-assign-cmds
+                                     cmds))))
              ;; FIXME: Handle varaliases!
              (let ((v (default-value s)))
                (push `(set-default