[Emacs-diffs] scratch/raeburn-startup 2c96099 27/43: Don't dump artifacts of the dump process.

[Ken Raeburn]

branch: scratch/raeburn-startup
commit 2c96099337be2bd0f4d7f29a680813028b1d5887
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 4e68505c..69691d1 100644
--- a/lisp/loadup.el
+++ b/lisp/loadup.el
@@ -530,7 +530,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