Subject: [PATCH 03/26] gnu: emacs-xyz: Do not use --quick or -Q.

From: Maxim Cournoyer <[email-masked]>
Date: Fri, 18 Dec 2020 17:17:00 -0500

The --quick options prevents loading the site-start.el, which is now required
for the initialization of the Guix Emacs packages.

* gnu/packages/emacs-xyz.scm (emacs-flycheck)
(emacs-perspective, emacs-nodejs-repl, emacs-rainbow-delimiters)
(emacs-emacsql-sqlite3, emacs-evil-magit, emacs-adoc-mode)
(emacs-cort, emacs-vdiff, emacs-org-generate, emacs-execline): Do not use the
--quick or -Q options.  Harmonize to use --batch instead of -batch.
---
 gnu/packages/emacs-xyz.scm | 22 +++++++++++-----------
 1 file changed, 11 insertions(+), 11 deletions(-)

diff --git a/gnu/packages/emacs-xyz.scm b/gnu/packages/emacs-xyz.scm
index 6ae301aeaf..01dab957aa 100644
--- a/gnu/packages/emacs-xyz.scm
+++ b/gnu/packages/emacs-xyz.scm
@@ -1176,7 +1176,7 @@ supports type hints, definition-jumping, completion, and more.")
                #t)))
          ;; TODO: many failing tests
          #:tests? #f
-         #:test-command '("emacs" "-Q" "--batch" "-L" "."
+         #:test-command '("emacs" "--batch" "-L" "."
                           "--load" "test/flycheck-test"
                           "--load" "test/run.el"
                           "-f" "flycheck-run-tests-main")))
@@ -7006,7 +7006,7 @@ regexp that matches all known keywords.")
     (build-system emacs-build-system)
     (arguments
      `(#:tests? #t
-       #:test-command '("emacs" "-Q" "-batch" "-L" "."
+       #:test-command '("emacs" "--batch" "-L" "."
                         "-l" "test/test-perspective.el"
                         "-f" "ert-run-tests-batch-and-exit")))
     (home-page "https://github.com/nex3/perspective-el")
@@ -8237,7 +8237,7 @@ strings, and code folding.")
                  ("nodejs-repl-command"
                   (string-append node "/bin/node")))))))
        #:tests? #t
-       #:test-command '("emacs" "-Q" "--batch"
+       #:test-command '("emacs" "--batch"
                         "-L" "."
                         "-l" "test/test.el"
                         "-f" "ert-run-tests-batch-and-exit")))
@@ -8817,7 +8817,7 @@ completion, interactive development and more.")
     (home-page "https://github.com/Fanael/rainbow-delimiters")
     (arguments
      `(#:tests? #t
-       #:test-command '("emacs" "-Q" "-batch"
+       #:test-command '("emacs" "--batch"
                         "-l" "rainbow-delimiters-test.el"
                         "-f" "ert-run-tests-batch-and-exit")))
     (synopsis "Highlight brackets according to their depth")
@@ -14638,7 +14638,7 @@ object @code{nil} corresponds 1:1 with @code{NULL} in the database.")
      `(("emacs-emacsql" ,emacs-emacsql)))
     (arguments
      `(#:tests? #t
-       #:test-command '("emacs" "-Q" "--batch" "-L" "."
+       #:test-command '("emacs" "--batch" "-L" "."
                         "--load" "emacsql-sqlite3-test.el"
                         "-f" "ert-run-tests-batch-and-exit")
        #:phases
@@ -17989,7 +17989,7 @@ Org-mode file, and citations of Zotero items in Pandoc Markdown files.")
          ("magit" ,emacs-magit)))
       (arguments
        `(#:tests? #t
-         #:test-command '("emacs" "-Q" "-batch"
+         #:test-command '("emacs" "--batch"
                           "-L" "."
                           "-l" "evil-magit-tests"
                           "-f" "ert-run-tests-batch-and-exit")))
@@ -19014,7 +19014,7 @@ and 'text viewing modes' respectively.")
                                "adoctest-test-tempo-quotes")))
              #t)))
        #:tests? #t
-       #:test-command '("emacs" "-Q" "-batch"
+       #:test-command '("emacs" "--batch"
                         "-l" "adoc-mode-test.el"
                         "-f" "ert-run-tests-batch-and-exit")))
     (propagated-inputs
@@ -19982,7 +19982,7 @@ functions to ensure they are called with the right arguments during testing.")
        `(("emacs-ansi" ,emacs-ansi)))
       (arguments
        `(#:tests? #t
-         #:test-command '("emacs" "--batch" "--quick"
+         #:test-command '("emacs" "--batch"
                           "--directory=." "--load=cort-tests.el"
                           "--funcall=cort-test-run")))
       (home-page "https://github.com/conao3/cort.el")
@@ -21724,7 +21724,7 @@ compatible with Emacs' shell modes.")
        `(("emacs-hydra" ,emacs-hydra)))
       (arguments
        `(#:tests? #t
-         #:test-command '("emacs" "-Q" "-batch" "-L" "."
+         #:test-command '("emacs" "--batch" "-L" "."
                           "-l" "vdiff-test.el"
                           "-f" "ert-run-tests-batch-and-exit")))
       (home-page "https://github.com/justbur/emacs-vdiff/")
@@ -25333,7 +25333,7 @@ personal wiki.")
      `(("emacs-mustache" ,emacs-mustache)))
     (arguments
      `(#:tests? #t
-       #:test-command '("emacs" "--batch" "--quick"
+       #:test-command '("emacs" "--batch"
                         "--directory=." "--load=org-generate-tests.el"
                         "--funcall=cort-test-run")))
     (build-system emacs-build-system)
@@ -25460,7 +25460,7 @@ or region and use of locally installed binaries.")
        `(("emacs-s" ,emacs-s)))
       (arguments
        `(#:tests? #t
-         #:test-command '("emacs" "-Q" "-batch" "-L" "."
+         #:test-command '("emacs" "--batch" "-L" "."
                           "-l" "t/indent.el"
                           "-f" "ert-run-tests-batch-and-exit")))
       (home-page "https://gitlab.com/KAction/emacs-execline/")
-- 
2.29.2