test-flan.el clears the arguments it reads, so a batch Emacs no longer stops to ask whether to visit the compiler binary once it passes 10 MB.
This commit is contained in:
parent
9f4a50538e
commit
717f07f985
@ -47,6 +47,11 @@ already rely on it — so nothing here is a stand-in for the real thing."
|
|||||||
(setq test-flan--failures (1+ test-flan--failures))
|
(setq test-flan--failures (1+ test-flan--failures))
|
||||||
(message " FAIL %s" name)))
|
(message " FAIL %s" name)))
|
||||||
|
|
||||||
|
;; Taken from `command-line-args', and the leftovers cleared: whatever is
|
||||||
|
;; still in `command-line-args-left' when this file finishes, Emacs visits as
|
||||||
|
;; a file, and visiting the compiler binary asks a yes-or-no question about
|
||||||
|
;; its size that a batch Emacs waits on forever.
|
||||||
|
(setq command-line-args-left nil)
|
||||||
(let* ((args (cdr (member "--" command-line-args)))
|
(let* ((args (cdr (member "--" command-line-args)))
|
||||||
(socket (nth 0 args))
|
(socket (nth 0 args))
|
||||||
(file (nth 1 args))
|
(file (nth 1 args))
|
||||||
|
|||||||
Loading…
x
Reference in New Issue
Block a user