Fix handling of '--dump-file' command-line option

* lisp/startup.el (command-line-1): Handle "--dump-file" and
"--seccomp" if they are left on the command-line.  (Bug#52106)

diff --git a/lisp/startup.el b/lisp/startup.el
index e1106419f10d1d14e8da437e0693c7629d0e008c..fc085e6d0ef60763fac7b73fa31041647cd385f8 100644 (file)
--- a/lisp/startup.el
+++ b/lisp/startup.el
@@ -2393,6 +2393,7 @@ A fancy display is used on graphic displays, normal otherwise."
                ;; and long versions of what's on command-switch-alist.
                (longopts
                 (append '("--funcall" "--load" "--insert" "--kill"
+                          "--dump-file" "--seccomp"
                           "--directory" "--eval" "--execute" "--no-splash"
                           "--find-file" "--visit" "--file" "--no-desktop")
                         (mapcar (lambda (elt) (concat "-" (car elt)))
@@ -2554,6 +2555,11 @@ nil default-directory" name)
                          (error "File name omitted from `-insert' option"))
                      (insert-file-contents (command-line-normalize-file-name tem)))
 
+                    ((or (equal argi "-dump-file")
+                         (equal argi "-seccomp"))
+                     ;; This was processed in C.
+                     (or argval (pop command-line-args-left)))
+
                     ((equal argi "-kill")
                      (kill-emacs t))