lilyp pushed a commit to branch emacs-team
in repository guix.
commit 76c162433783089db355270498a735d384627b1a
Author: Liliana Marie Prikler <liliana.prik...@gmail.com>
AuthorDate: Sun Mar 2 09:41:35 2025 +0100
build-system: emacs: Enable tests when not cross-compiling.
This is a first effort towards making emacs-build-system more suitable for
cross-compilation.
* guix/build-system/emacs.scm (emacs-build)[#:tests?]: Enable when not
cross-compiling.
* gnu/packages/emacs-xyz.scm (emacs-ac-php, emacs-chatgpt-shell)
(emacs-inspector, emacs-tree-inspector, emacs-pug-mode, emacs-llama)
(emacs-magit, emacs-ezf, emacs-speed-type, emacs-graphql)
(emacs-fb2-reader, emacs-ample-regexps, emacs-rescript-mode)
(emacs-relative-buffers, emacs-emms, emacs-aio, emacs-async)
(emacs-latex-extra, emacs-auto-themer, emacs-bm, emacs-varuga)
(emacs-ellama, emacs-org-fc, emacs-go-mode, emacs-dash,
emacs-undo-fu-session)
(emacs-s, emacs-lemon, emacs-fringe-helper, emacs-git-link)
(emacs-explain-pause-mode, emacs-zig-mode, emacs-calc-currency)
(emacs-string-inflection, emacs-ob-go, emacs-robot-log, emacs-rspec)
(emacs-sqlite3-api, emacs-shx, emacs-el-job, emacs-elisp-demos)
(emacs-sudo-edit, emacs-subed, emacs-deferred, emacs-company-lsp,
emacs-jack)
(emacs-elquery, emacs-cov, emacs-god-mode, emacs-org-pomodoro)
(emacs-eglot-tempel, emacs-dumbparens, emacs-perspective, emacs-realgud)
(emacs-hydra, emacs-avy, emacs-lispy, emacs-clojure-mode, emacs-qt-pro-mode)
(emacs-sphinx-doc, emacs-julia-mode, emacs-js2-mode, emacs-nodejs-repl)
(emacs-projectile, emacs-skeletor, emacs-elfeed, emacs-elfeed-org)
(emacs-mocker, emacs-find-file-in-project, emacs-pyvenv, emacs-elpy)
(emacs-rainbow-delimiters, emacs-visual-fill-column, emacs-visual-replace)
(emacs-wucuo, emacs-yaml, emacs-yari, emacs-wgrep, emacs-islisp-mode)
(emacs-lua-mode, emacs-evil-collection, emacs-evil-owl, emacs-evil-exchange)
(emacs-evil-lion, emacs-evil-expat), emacs-monky, emacs-org, emacs-ht)
(emacs-yasnippet, emacs-memoize, emacs-use-package, emacs-xmlgen)
(emacs-cc-mode, emacs-php-mode, emacs-evil-surround, emacs-org-transclusion)
(emacs-json-reformat, emacs-display-wttr, emacs-git-messenger)
(emacs-enh-ruby-mode, emacs-browse-at-remote, emacs-tiny, emacs-unidecode)
(emacs-circe, emacs-evil-quickscope, emacs-groovy-modes, emacs-kotlin-mode_)
(emacs-kv, emacs-auth-source-pass, emacs-emacsql, emacs-org-recur)
(emacs-org-super-agenda, emacs-ts, emacs-circadian, emacs-eldev,
emacs-citar)
(emacs-loop, emacs-elisp-refs, emacs-esup, emacs-macrostep,
emacs-parent-mode)
(emacs-helpful, emacs-suggest, emacs-auto-yasnippet)
(emacs-git-auto-commit-mode, emacs-devil, emacs-devil-multiedit)
(emacs-go-translate, emacs-langtool, emacs-helm-company, emacs-picpocket)
(emacs-srht, emacs-github-review, emacs-deadgrep, emacs-adoc-mode)
(emacs-racer, emacs-sesman, emacs-buttercup, emacs-cort, emacs-annalist)
(emacs-general, emacs-libmpdel, emacs-navigel, emacs-eat, emacs-detached)
(emacs-repology, emacs-bfuture, emacs-undo-propose-el, emacs-tco-el)
(emacs-vdiff, emacs-exwm-firefox, emacs-rjsx-mode, emacs-dash-docs)
(emacs-casual-lib, emacs-evil-numbers, emacs-evil-traces, emacs-ox-tufte)
(emacs-org-jira, emacs-systemd-mode, emacs-doom-themes, emacs-exiftool)
(emacs-qrencode, emacs-org-journal, emacs-weblorg, emacs-execline)
(emacs-webpaste, emacs-keystore-mode, emacs-ein, emacs-straight-el)
(emacs-vundo, emacs-org-cliplink, emacs-x509-mode)[arguments]:
Remove #:tests?.
(emacs-f, emacs-shut-up, emacs-ansi, emacs-commander)
(emacs-ert-runner)[arguments]: Add #:tests? #f.
(emacs-with-editor, emacs-tablist, emacs-pkg-info, emacs-el-x, emacs-helm)
(emacs-xelb, emacs-repo): Likewise.
---
gnu/packages/emacs-xyz.scm | 348 ++++++++++++--------------------------------
guix/build-system/emacs.scm | 2 +-
2 files changed, 97 insertions(+), 253 deletions(-)
diff --git a/gnu/packages/emacs-xyz.scm b/gnu/packages/emacs-xyz.scm
index e8eb36bb78..3bdb80b334 100644
--- a/gnu/packages/emacs-xyz.scm
+++ b/gnu/packages/emacs-xyz.scm
@@ -369,7 +369,6 @@ buffer, a file on your disk, or a string from the kill
ring.")
(build-system emacs-build-system)
(arguments
(list
- #:tests? #true
#:test-command #~(list "ert-runner")))
(inputs
(list emacs-auto-complete
@@ -713,7 +712,6 @@ summarizing text using an LLM.")
(call-with-output-file ".emacs.d/.chatgpt-shell.el"
(lambda (port)
(display "nil" port))))))
- #:tests? #t
#:test-command #~(list "emacs" "-Q" "--batch"
"-l" "test_chatgpt-shell.el"
"-l" "chatgpt-shell.el"
@@ -1009,7 +1007,6 @@ configuration language which makes it trivial to write
your own themes.")
(build-system emacs-build-system)
(arguments
(list
- #:tests? #t
#:test-command #~(list "emacs" "-Q" "--batch"
"-l" "inspector.el"
"-l" "inspector-tests.el"
@@ -1067,7 +1064,6 @@ git-worktrees.")
(build-system emacs-build-system)
(arguments
(list
- #:tests? #true
#:test-command #~(list "emacs" "-Q" "--batch"
"-L" "."
"-l" "tree-inspector-tests.el"
@@ -1428,7 +1424,6 @@ out of the box.")
(build-system emacs-build-system)
(arguments
(list
- #:tests? #t
#:test-command #~(list "ert-runner")))
(home-page "https://github.com/hlissner/emacs-pug-mode";)
(synopsis "Pug support for Emacs")
@@ -1780,6 +1775,7 @@ configuration files, such as @file{.gitattributes},
@file{.gitignore}, and
(build-system emacs-build-system)
(arguments
(list
+ #:tests? #f ; no test suite
#:phases
#~(modify-phases %standard-phases
(add-before 'install 'enter-lisp-directory
@@ -1907,8 +1903,7 @@ libgit2 bindings for Emacs, intended to boost the
performance of Magit.")
"0pa7sdj7rxj8hr3r2lcwz3z04b8b9k61d9j9a7qr1n3n9x9krdjd"))))
(build-system emacs-build-system)
(arguments
- (list #:tests? #true
- #:test-command #~(list "emacs" "-Q" "--batch"
+ (list #:test-command #~(list "emacs" "-Q" "--batch"
"-l" "llama.el"
"-f" "ert-run-tests-batch-and-exit")))
(propagated-inputs (list emacs-compat))
@@ -1963,7 +1958,6 @@ before interacting with non-free LLMs.")
(build-system emacs-build-system)
(arguments
(list
- #:tests? #t
#:test-command #~(list "make" "-C" ".." "test")
#:phases
#~(modify-phases %standard-phases
@@ -2268,8 +2262,7 @@ purpose finder.")
"0nrby8f3magyjwwyqk9bqyrgh04vlm8alajzng9x507n42pb7bn7"))))
(build-system emacs-build-system)
(arguments
- (list #:tests? #t
- #:test-command #~(list "emacs" "--batch"
+ (list #:test-command #~(list "emacs" "--batch"
"-l" "ezf.el" "-l" "ezf-test.el"
"-f" "ert-run-tests-batch-and-exit")
#:phases
@@ -2651,7 +2644,6 @@ you will die. The game builds the list of words from the
active buffer.")
(build-system emacs-build-system)
(arguments
(list
- #:tests? #true
#:test-command
#~(list "emacs" "-Q" "--batch" "-L" "."
"-l" "test-speed-type.el"
@@ -2692,7 +2684,6 @@ accuracy) while you are typing.")
(build-system emacs-build-system)
(arguments
(list
- #:tests? #true
#:test-command #~(list "ert-runner")
#:phases
#~(modify-phases %standard-phases
@@ -3225,7 +3216,6 @@ provides an optional IDE-like error list.")
(build-system emacs-build-system)
(arguments
(list
- #:tests? #t
#:test-command
#~(list "buttercup" "-L" ".")
#:phases
@@ -3724,8 +3714,7 @@ skip set strings, which are arguments to
@code{skip-chars-forward} and
(native-inputs
(list emacs-ert-runner))
(arguments
- `(#:tests? #t
- #:test-command '("ert-runner" "-l" "ample-regexps")))
+ `(#:test-command '("ert-runner" "-l" "ample-regexps")))
(home-page "https://github.com/immerrr/ample-regexps.el";)
(synopsis "Compose and reuse Emacs regexps")
(description
@@ -3840,7 +3829,6 @@ optional minor mode which can apply this command
automatically on save.")
(build-system emacs-build-system)
(arguments
(list
- #:tests? #t
#:test-command #~(list "ert-runner")))
(native-inputs
(list emacs-ert-runner))
@@ -3917,7 +3905,6 @@ Rust.")
(build-system emacs-build-system)
(arguments
(list
- #:tests? #t
#:test-command #~(list "ert-runner")))
(native-inputs
(list emacs-ert-runner))
@@ -4176,8 +4163,7 @@ light user interface.")
(name "emacs-emms")
(build-system emacs-build-system)
(arguments
- `(#:tests? #t
- #:test-command
+ `(#:test-command
(list "emacs" "-Q" "--batch"
"--eval=(cd \"test/\")"
"-l" "emms-tests.el"
@@ -5142,8 +5128,7 @@ rather than the contents of files.")
"1y7j10j74r3fy0rcb8g3cm9nlls34qb0pz9xkia7psp77syrlz54"))))
(build-system emacs-build-system)
(arguments
- `(#:tests? #t
- #:test-command '("emacs" "--batch"
+ `(#:test-command '("emacs" "--batch"
"-l" "aio-test.el"
"-f" "ert-run-tests-batch-and-exit")))
(propagated-inputs
@@ -5172,8 +5157,7 @@ paused.")
"0krg7n8l3yv1fnixnx6j5imdh10jpfabm6ym9s1s610hp47gpfaz"))))
(build-system emacs-build-system)
(arguments
- `(#:tests? #t
- #:test-command '("buttercup" "-L" ".")))
+ `(#:test-command '("buttercup" "-L" ".")))
(native-inputs
(list emacs-buttercup))
(synopsis "Asynchronous processing in Emacs")
@@ -5255,7 +5239,6 @@ or XEmacs.")
(build-system emacs-build-system)
(arguments
(list
- #:tests? #true
#:test-command
#~(list "emacs" "-Q" "--batch"
"--eval=(cd \"tests/\")"
@@ -5320,7 +5303,6 @@ It uses @command{dvisvgm}, @command{xclip},
@command{pngpaste} and
(build-system emacs-build-system)
(arguments
(list
- #:tests? #true
#:test-command #~(list "emacs" "-Q" "--batch"
"-l" "tests/autothemer-tests.el"
"-f" "ert-run-tests-batch-and-exit")))
@@ -5407,7 +5389,6 @@ within emacs.")
(build-system emacs-build-system)
(arguments
(list
- #:tests? #true
#:test-command #~(list "emacs" "-Q" "--batch"
"-l" "bm-tests.el"
"-f" "ert-run-tests-batch-and-exit")))
@@ -5456,7 +5437,6 @@ Emacs buffer.")
(base32
"01hlnhqhys8qzfwhza1ypc436zg5lhlkx5yy71bhmrbmyfzfh0fr"))))
(build-system emacs-build-system)
- (arguments (list #:tests? #t))
(home-page "https://git.systemreboot.net/varuga/about/";)
(synopsis "Send iCal calendar invites by email")
(description
@@ -5880,7 +5860,6 @@ that the binary uses instead of the actual binary
contents.")
(substitute* (find-files "tests/" "\\.el$")
(("\\(ert-deftest
test-ellama-context-element-extract-info-node .*" all)
(string-append all "(skip-unless nil)\n"))))))
- #:tests? #t
#:test-command #~(list "emacs" "-Q" "--batch"
"-l" "ellama.el"
"-l" "tests/test-ellama.el"
@@ -5915,7 +5894,6 @@ your preferred text editor.")
(list
#:include #~(cons* "\\.awk$" "\\.org$" %default-include)
#:exclude #~(cons "^tests/" %default-exclude)
- #:tests? #t
#:test-command #~(list "emacs" "--batch"
"-L" "."
"-L" "tests/"
@@ -6184,7 +6162,6 @@ current match, total matches and exit status.
"00qzn136d8cl3szbi44xf3iiv75r6n1m7wwgldmzn4i5mpz8dbq7"))))
(arguments
(list
- #:tests? #t
#:test-command #~(list "ert-runner")
#:phases
#~(modify-phases %standard-phases
@@ -6472,6 +6449,7 @@ Lisp developers who want to write macros with
convenience.")
(base32
"11vmvrhmsxy97bfj7jndpc58bik7177i3wvc45mlyldxwyirs962"))))
(build-system emacs-build-system)
+ (arguments (list #:tests? #f)) ; no test suite
(home-page "https://github.com/politza/tablist";)
(synopsis "Extension for @code{tabulated-list-mode}")
(description "Tablist is the Emacs package that provides several
@@ -6841,8 +6819,7 @@ next matching page.")
"0z6f8y1m9amhg427iz1d4xcyr6n0kj5w7kmiz134p320ixsdnzd8"))))
(build-system emacs-build-system)
(arguments
- (list #:tests? #t
- #:phases
+ (list #:phases
#~(modify-phases %standard-phases
(add-after 'unpack 'disable-byte-compile-error-on-warn
(lambda _
@@ -7359,7 +7336,6 @@ allowing you to visit all previous states of the document
if you need.")
(build-system emacs-build-system)
(arguments
(list
- #:tests? #t
;; The tests require temp files handling which a recent change disabled
;; by default. We re-enable it here to make tests work again.
#:test-command #~(list "emacs" "--batch" "--eval"
@@ -7392,8 +7368,7 @@ which is restored where possible when the file is loaded
again.")
(base32 "010i92kagqbfis46n1ffa28fgkdkjp55n13b6f4izar5r7ixm6wx"))))
(build-system emacs-build-system)
(arguments
- `(#:tests? #t
- #:test-command '("./run-tests.sh")))
+ `(#:test-command '("./run-tests.sh")))
(home-page "https://github.com/magnars/s.el";)
(synopsis "Emacs string manipulation library")
(description "This package provides an Emacs library for manipulating
@@ -7495,8 +7470,6 @@ easily supportable, giving the same experience across
environments.")
(build-system emacs-build-system)
(arguments
(list
- #:tests? #true
-
;; Only one test out of the four passes
#:test-command #~(list "emacs" "-Q" "--batch" "-L" "."
;; "-l" "lemon--test.el"
@@ -7649,6 +7622,7 @@ Emacs.")
(base32
"0ccrcfhqfbv9qff38sfym69mai7k7z89yndi6nip8wi5hpd2addc"))))
(build-system emacs-build-system)
+ (arguments (list #:tests? #f)) ; circular dependency on ert-runner
(propagated-inputs
(list emacs-s emacs-dash))
(home-page "https://github.com/rejeep/f.el";)
@@ -7700,8 +7674,7 @@ using the Fountain plain text markup format.")
(base32 "0ra9rc53l1gvkqank8apasl3r7wz2yfjrcvmfk3wpxhh24ppxv9d"))))
(build-system emacs-build-system)
(arguments
- `(#:tests? #t
- #:test-command '("emacs" "--batch"
+ `(#:test-command '("emacs" "--batch"
"-l" "tests.el"
"-f" "ert-run-tests-batch-and-exit")))
(home-page "https://github.com/nschum/fringe-helper.el";)
@@ -7778,7 +7751,6 @@ window.")
(build-system emacs-build-system)
(arguments
(list
- #:tests? #t
#:test-command #~(list "make" "test")))
(home-page "https://github.com/sshaw/git-link";)
(synopsis "Create links for files and commits in GitHub/GitLab/etc. repos")
@@ -8167,8 +8139,7 @@ keep pressing the key until it selects what you want.
There's also
(native-inputs
(list emacs-buttercup))
(arguments
- '(#:tests? #t
- #:phases
+ '(#:phases
(modify-phases %standard-phases
;; This causes the byte-compilation before unit-tests to fail.
(add-after 'unpack 'remove-error-on-warn
@@ -8475,7 +8446,6 @@ Emacs, inspired by @code{Dracula} theme.")
(build-system emacs-build-system)
(arguments
(list
- #:tests? #t
#:emacs emacs
#:test-command #~(list "emacs" "--batch"
"-l" "zig-mode.el"
@@ -8606,6 +8576,7 @@ ERC, an Emacs client for IRC (Internet Relay Chat). It
relies on the
(sha256
(base32 "1bnmrwrhra6cpc3jjgwwzrydj5ps7q2dlkh2ag4j7rkyv4dlk351"))))
(build-system emacs-build-system)
+ (arguments (list #:tests? #f)) ; circular dependency on ert-runner
(home-page "https://github.com/cask/shut-up";)
(synopsis "Silence Emacs")
(description "This package silences most output of Emacs when running an
@@ -8791,7 +8762,6 @@ Emacs can load Org files as Lisp source files directly.")
(build-system emacs-build-system)
(arguments
(list
- #:tests? #t
#:test-command #~(list "emacs" "--batch"
"-L" "."
"-l" "test/calc-currency-init.el"
@@ -8895,8 +8865,7 @@ customizability, and extensibility.")
(native-inputs
(list emacs-ert-runner))
(arguments
- `(#:tests? #t
- #:test-command '("ert-runner")))
+ `(#:test-command '("ert-runner")))
(home-page "https://github.com/akicho8/string-inflection";)
(synopsis "Convert symbol names between different naming conventions")
(description
@@ -9203,7 +9172,6 @@ blocks with @code{org-babel} in @code{org-mode}.")
(build-system emacs-build-system)
(arguments
(list
- #:tests? #t
#:test-command #~(list "emacs" "--batch" "-L" "."
"--eval=(require 'ob-go)"
"-l" "test-ob-go.el"
@@ -9391,7 +9359,6 @@ keywords and smart indentation.")
"1l9yxryrhvylh2x17cczd8v8978w1nv8173d4l9hv0cr26kp5b68"))))
(build-system emacs-build-system)
(native-inputs (list python-robotframework))
- (arguments (list #:tests? #t))
(home-page "https://sr.ht/~apteryx/emacs-robot-log/";)
(synopsis "Emacs major mode for viewing RobotFramework debug log files")
(description "@code{robot-log} is an Emacs major mode that allows more
@@ -9471,7 +9438,6 @@ explorations.")
(build-system emacs-build-system)
(arguments
`(#:include (cons "^snippets\\/rspec-mode\\/" %default-include)
- #:tests? #t
#:test-command '("make" "test")))
(home-page "https://github.com/pezra/rspec-mode";)
(synopsis "Provides a rspec mode for working with RSpec")
@@ -9712,7 +9678,6 @@ It is not intended as a user interface.")
(build-system emacs-build-system)
(arguments
(list
- #:tests? (not (%current-target-system))
#:test-command #~(list "make" "test" "EMACS=emacs")
#:modules '((guix build emacs-build-system)
(guix build emacs-utils)
@@ -9865,7 +9830,6 @@ the speedbar window.")
(build-system emacs-build-system)
(arguments
(list
- #:tests? #t
#:test-command
#~(list "emacs" "--batch" "--quiet" "--script" "test/script.el")
#:phases
@@ -10294,8 +10258,7 @@ files which are intended to be packages.")
"09zipgg52zh7kfamnslbrrghs2sndkwj0kcmbb8mxwmx5k5zi62d"))))
(build-system emacs-build-system)
(arguments
- (list #:tests? #true
- #:test-command #~(list "emacs" "-Q" "--batch"
+ (list #:test-command #~(list "emacs" "-Q" "--batch"
"-l" "el-job-test.el"
"-f" "ert-run-tests-batch-and-exit")))
(propagated-inputs (list emacs-compat))
@@ -10351,7 +10314,6 @@ variable-width (i.e., proportional, or variable pitch)
fonts.")
(arguments
(list
#:include #~(cons* "\\.org$" %default-include)
- #:tests? #t
#:test-command #~(list "make" "test")))
(home-page "https://github.com/xuchunyang/elisp-demos/";)
(synopsis "Enhance @code{*Help*} buffers with additional examples")
@@ -10462,7 +10424,6 @@ Gnus, e.g., for applying patches received by email.")
(lambda _
(substitute* "Makefile"
(("\\$\\(CASK\\) exec ") "")))))
- #:tests? #t
#:test-command #~(list "make" "test")))
(home-page "https://github.com/nflath/sudo-edit/";)
(synopsis "Open files as another user")
@@ -10484,7 +10445,6 @@ user.")
"0bvsv688mqhga8dffy3841wxs5pkw0vish15dgligll47cj98mzp"))))
(arguments
(list
- #:tests? #t
#:test-command #~(list "buttercup" "-L" ".")))
(native-inputs (list emacs-buttercup))
(inputs (list ffmpeg))
@@ -10743,7 +10703,6 @@ framework for Emacs Lisp to be used with @code{ert}.")
(lambda _
(substitute* "Makefile"
(("\\$\\(CASK\\) exec ") "")))))
- #:tests? #t
#:test-command '("make" "test")))
(native-inputs
(list emacs-ert-expectations emacs-ert-runner emacs-undercover))
@@ -11621,8 +11580,7 @@ on context.")
(native-inputs
(list emacs-buttercup))
(arguments
- `(#:tests? #t
- #:test-command '("buttercup" "-L" ".")))
+ `(#:test-command '("buttercup" "-L" ".")))
(home-page "https://github.com/tigersoldier/company-lsp";)
(synopsis "Completion for @code{lsp-mode}")
(description
@@ -12269,7 +12227,6 @@ documentation, enhancing the Python development
experience within Emacs.")
(build-system emacs-build-system)
(arguments
(list
- #:tests? #t
#:test-command #~(list "emacs"
"--batch"
"-l"
@@ -12380,7 +12337,6 @@ the locations of docstrings, arguments, and functions.")
(arguments
(list
#:emacs emacs-no-x
- #:tests? #t
#:test-command #~(list "ert-runner")
#:phases #~(modify-phases %standard-phases
(add-after 'unpack 'fix-native-compilation
@@ -12426,7 +12382,6 @@ and set HTML attributes.")
(arguments
(list
#:emacs emacs-no-x ;for libxml
- #:tests? #t
#:test-command #~(list "ert-runner")
#:phases
#~(modify-phases %standard-phases
@@ -12542,8 +12497,7 @@ just provides syntax highlighting.")
"1njln47w25ix9w0xjv02110ngr8d8ma3w7db0x4xcxhihbl65zly"))))
(build-system emacs-build-system)
(arguments
- (list #:tests? #true
- #:test-command
+ (list #:test-command
#~(list "emacs" "--no-init-file" "--batch"
"--eval=(require 'ecukes)" "--eval=(ecukes)")))
(native-inputs (list emacs-ecukes))
@@ -13027,7 +12981,6 @@ save, it exports back to the original non-Org file.")
(arguments
(list
#:include #~(cons "^resources\\/" %default-include)
- #:tests? #t
#:test-command
#~(list "emacs" "--batch"
"-l" "org-pomodoro-tests.el"
@@ -14077,7 +14030,6 @@ call.")
(build-system emacs-build-system)
(arguments
(list
- #:tests? #true
#:test-command #~(list "emacs" "-Q" "-batch"
"-l" "eglot-tempel-tests.el"
"-f" "ert-run-tests-batch-and-exit")
@@ -14267,7 +14219,6 @@ well as completely new features.")
(build-system emacs-build-system)
(arguments
(list
- #:tests? #t
#:test-command #~(list "make" "test")))
(home-page "https://github.com/radian-software/dumbparens";)
(synopsis "Minor mode that provides improvements on Smartparens")
@@ -14459,8 +14410,7 @@ for Perl programming, and a tutorial for novices to
start using Emacs.")
(base32 "1vpjc9mk96siabl5j0k023bag00cwb852cpc9f89jyqhavm6011b"))))
(build-system emacs-build-system)
(arguments
- `(#:tests? #t
- #:test-command '("emacs" "-Q" "-batch" "-L" "."
+ `(#:test-command '("emacs" "-Q" "-batch" "-L" "."
"-l" "test/test-perspective.el"
"-f" "ert-run-tests-batch-and-exit")))
(home-page "https://github.com/nex3/perspective-el";)
@@ -14632,7 +14582,6 @@ text excepting lines containing matches.")
(build-system emacs-build-system)
(arguments
(list
- #:tests? #t
#:phases
#~(modify-phases %standard-phases
(add-after 'unpack 'fix-realgud:run-process-void-error
@@ -14814,8 +14763,7 @@ work and provide clipboard action).")
"0fapvhmhgc9kppf3bvkgry0cd7gyilg7sfvlscfrfjxpx4xvwsfy"))))
(build-system emacs-build-system)
(arguments
- `(#:tests? #t
- #:test-command '("make" "test")))
+ `(#:test-command '("make" "test")))
(home-page "https://github.com/abo-abo/hydra";)
(synopsis "Make Emacs bindings that stick around")
(description
@@ -15138,8 +15086,7 @@ icons as well.")
(base32 "09qdni1s74i5pv8741szl5g4ynj8fxn0x65qmwa9rmfkbimnc0fs"))))
(build-system emacs-build-system)
(arguments
- `(#:tests? #t
- #:test-command '("make" "test")))
+ `(#:test-command '("make" "test")))
(home-page "https://github.com/abo-abo/avy";)
(synopsis "Tree-based completion for Emacs")
(description
@@ -15370,7 +15317,6 @@ navigate code in a tree-like fashion.")
(beginning-of-line)
(kill-sexp))
(basic-save-buffer))))))
- #:tests? #t
;; Set BEMACS to prevent the test suite from loading straight.el.
#:test-command #~(list "make" "test" "BEMACS=emacs -batch")))
(synopsis "Modal S-expression editing")
@@ -15481,8 +15427,7 @@ allowing unprefixed keys to insert their respective
characters as expected.")
(native-inputs
(list emacs-buttercup emacs-dash emacs-paredit emacs-s))
(arguments
- `(#:tests? #t
- #:test-command '("buttercup")))
+ `(#:test-command '("buttercup")))
(home-page "https://github.com/clojure-emacs/clojure-mode";)
(synopsis "Major mode for Clojure code")
(description
@@ -15744,8 +15689,7 @@ builtin JavaScript mode.")
(base32 "1xprnq3y74hfm931a80wcj35faafzqc59j3vavx95wzv4z4yfgdm"))))
(build-system emacs-build-system)
(arguments
- (list #:tests? #t
- #:test-command #~(list "make" "test")))
+ (list #:test-command #~(list "make" "test")))
(home-page "https://github.com/emacsorphanage/qt-pro-mode";)
(synopsis "Emacs major mode for Qt build-system files")
(description
@@ -15811,6 +15755,7 @@ languages.")
(sha256
(base32 "0nk12dcppdyhav6m6yf7abpywyd7amxd4237zsfd32w4zxsx39k1"))))
(build-system emacs-build-system)
+ (arguments (list #:tests? #f)) ; tests appear to require cask
(propagated-inputs (list emacs-epl))
(home-page "https://github.com/lunaryorn/pkg-info.el";)
(synopsis "Information about Emacs packages")
@@ -15878,7 +15823,6 @@ as Fuseki or DBPedia.")
(build-system emacs-build-system)
(arguments
(list
- #:tests? #true
#:test-command #~(list "emacs" "-Q" "--batch"
"-l" "sphinx-doc-tests.el"
"-f" "ert-run-tests-batch-and-exit")))
@@ -16001,7 +15945,6 @@ E-Prime forbids the use of the \"to be\" form to
strengthen your writing.")
(list
#:include
#~(cons* "^make-julia-latexsubs\\.jl" %default-include)
- #:tests? #t
#:test-command #~(list "emacs" "--batch"
"-l" "julia-mode-tests.el"
"-f" "ert-run-tests-batch-and-exit")))
@@ -16105,8 +16048,7 @@ to all the other commands, too.")
(base32 "11ppp1m7hl4ii79zjw62bqvksyzh5xmp3q1qw21wlj2s47mkpm73"))))
(build-system emacs-build-system)
(arguments
- `(#:tests? #t
- #:test-command '("make" "test")))
+ `(#:test-command '("make" "test")))
(home-page "https://github.com/mooz/js2-mode/";)
(synopsis "Improved JavaScript editing mode for Emacs")
(description
@@ -16172,7 +16114,6 @@ an Emacs buffer.")
;; programs so that everything works out-of-the-box.
(emacs-substitute-variables "nodejs-repl.el"
("nodejs-repl-command" node))))))
- #:tests? #t
#:test-command #~(list "emacs" "-Q" "--batch"
"-L" "."
"-l" "test/test.el"
@@ -16360,7 +16301,6 @@ like @code{org-edit-src-code} but for arbitrary
regions.")
(build-system emacs-build-system)
(arguments
(list
- #:tests? #t
#:test-command #~(list "buttercup" "-L" ".")
#:phases
#~(modify-phases %standard-phases
@@ -16401,7 +16341,6 @@ empty @file{.projectile} file in it.")
(arguments
(list
#:include #~(cons "^project-skeletons\\/" %default-include)
- #:tests? #true
#:test-command #~(list "ert-runner")
#:phases
#~(modify-phases %standard-phases
@@ -16441,8 +16380,7 @@ and tooling.")
(base32 "0yq93abyadzrmcd40pi06wcr4jg9ddhlz2phg0wjypprqvv4q49z"))))
(build-system emacs-build-system)
(arguments
- `(#:tests? #t
- #:test-command '("make" "test")
+ `(#:test-command '("make" "test")
#:phases
(modify-phases %standard-phases
(add-after 'unpack 'patch-program-calls
@@ -16516,8 +16454,7 @@ A function to toggle the @code{*elfeed-log*} buffer in
a popup window.
(base32 "0giwnzlqk2s5hb6fs8a0l4dxcmn2fvkngpj1fayzwj0qnvds1kri"))))
(build-system emacs-build-system)
(arguments
- `(#:tests? #t
- #:test-command '("ert-runner" "-L" "org-mode/lisp")))
+ `(#:test-command '("ert-runner" "-L" "org-mode/lisp")))
(propagated-inputs (list emacs-elfeed))
(native-inputs (list emacs-ert-runner emacs-xtest))
(home-page "https://github.com/remyhonig/elfeed-org";)
@@ -16630,7 +16567,8 @@ feed subscriptions.")
"1i6j44ssxm1xdg0mf91nh1lnprwsaxsx8vsrf720nan7mfr283h5"))))
(build-system emacs-build-system)
(arguments
- `(#:phases
+ `(#:tests? #f ; no tests
+ #:phases
(modify-phases %standard-phases
;; Move the source files to the top level, which is included in
;; the EMACSLOADPATH.
@@ -16769,8 +16707,7 @@ on your highlights and notes)
(base32 "1dc514cqbfmg33sb3j90s5jmw6jnm3wzvs0zhw3maz13bp7w6z48"))))
(build-system emacs-build-system)
(arguments
- `(#:tests? #t
- #:test-command '("ert-runner")))
+ `(#:test-command '("ert-runner")))
(native-inputs
(list emacs-ert-runner))
(propagated-inputs
@@ -16797,8 +16734,7 @@ maximizes flexibility (at the expense of conciseness).")
(base32 "1aqlzx1aibhkmvqasb7vbawj277rbyrk93v6svqs0m3v6n3g996i"))))
(build-system emacs-build-system)
(arguments
- `(#:tests? #t
- #:test-command '("ert-runner" "tests")))
+ `(#:test-command '("ert-runner" "tests")))
(native-inputs
(list emacs-ert-runner))
(home-page "https://github.com/technomancy/find-file-in-project";)
@@ -16861,7 +16797,6 @@ another window.")
(lambda _
(ert-number-tests "test/pyvenv-hook-dir-test.el"
"pyvenv-hook-dir"))))
- #:tests? #t
#:test-command '("ert-runner")))
(native-inputs
(list emacs-ert-runner emacs-mocker))
@@ -17014,7 +16949,6 @@ indentation guides in Emacs:
(mkdir-p man1)
(copy-file "docs/_build/man/elpy.1"
(string-append man1 "/elpy.1"))))))
- #:tests? #t
#:test-command '("ert-runner")))
(propagated-inputs
(list emacs-company
@@ -17089,8 +17023,7 @@ completion, interactive development and more.")
(build-system emacs-build-system)
(home-page "https://github.com/Fanael/rainbow-delimiters";)
(arguments
- `(#:tests? #t
- #:test-command '("emacs" "-Q" "-batch"
+ `(#:test-command '("emacs" "-Q" "-batch"
"-l" "rainbow-delimiters-test.el"
"-f" "ert-run-tests-batch-and-exit")))
(synopsis "Highlight brackets according to their depth")
@@ -17230,7 +17163,6 @@ generated by Org mode (or Markdown mode) is left
untouched.")
(build-system emacs-build-system)
(arguments
(list
- #:tests? #t
#:test-command #~(list "emacs" "--batch"
"-l" "test/visual-fill-column-test.el"
"-l" "test/test-helper.el"
@@ -17266,7 +17198,6 @@ window edge.")
(build-system emacs-build-system)
(arguments
(list
- #:tests? #t
#:phases #~(modify-phases %standard-phases
(add-before 'check 'add-test-dir-to-emacs-load-path
(lambda _
@@ -17340,8 +17271,7 @@ restrict the text width to 80 characters.")
(base32 "0ivy3jaj9jml10jn020mma6x92j8q75q7wzbd23m9jl4w60bpqlq"))))
(build-system emacs-build-system)
(arguments
- `(#:tests? #t
- #:test-command '("make" "test")
+ `(#:test-command '("make" "test")
#:phases (modify-phases %standard-phases
;; Set HOME, otherwise tests fail on loading aspell dict.
(add-before 'check 'set-home
@@ -17433,7 +17363,6 @@ that uses the standard completion function
completing-read.")
(build-system emacs-build-system)
(arguments
(list
- #:tests? #t
#:test-command #~(list "emacs" "--batch" "-Q"
"-l" "yaml.el"
"-l" "yaml-tests.el"
@@ -17487,7 +17416,6 @@ behavior very similar to that of Python mode.")
(build-system emacs-build-system)
(arguments
(list
- #:tests? #t
#:test-command #~(list "ert-runner")
#:phases
#~(modify-phases %standard-phases
@@ -17617,7 +17545,6 @@ by Python's Jinja.")
(build-system emacs-build-system)
(arguments
(list
- #:tests? #true
#:test-command #~(list "emacs" "--batch" "-Q"
"-l" "wgrep-test.el"
"-f" "ert-run-tests-batch-and-exit")))
@@ -17644,6 +17571,7 @@ ack, ag, helm and pt.")
(sha256
(base32 "0l9p6yiv8w9s0rpa4fyrp9gw1dgwpyr9fmkhs53bhc6v9x7br8ix"))))
(build-system emacs-build-system)
+ (arguments (list #:tests? #f)) ; no test suite
(propagated-inputs
(list emacs-async emacs-popup))
(home-page "https://emacs-helm.github.io/helm/";)
@@ -17915,7 +17843,6 @@ target will call @code{compile} on it.")
(arguments
(list
#:include #~(cons "\\.lsp$" %default-include)
- #:tests? #true
#:test-command #~(list "ert-runner")
#:phases
#~(modify-phases %standard-phases
@@ -18339,7 +18266,6 @@ using package inferred style.")
(build-system emacs-build-system)
(arguments
(list
- #:tests? #t
#:test-command #~(list "buttercup" "-l" "lua-mode.el")
#:phases
#~(modify-phases %standard-phases
@@ -18471,7 +18397,6 @@ extensions.")
(arguments
(list
#:include #~(cons* "^modes\\/" %default-include)
- #:tests? #true
#:test-command #~(list "emacs" "-Q" "--batch"
"-L" "."
"-L" "./test"
@@ -18577,7 +18502,6 @@ used for reverse direction.")
(build-system emacs-build-system)
(arguments
(list
- #:tests? #t
#:test-command #~(list "make" "test")
#:phases
#~(modify-phases %standard-phases
@@ -18698,7 +18622,6 @@ state and everything else in Emacs.")
(substitute* "Makefile"
(("cask exec ") ""))
#t)))
- #:tests? #t
#:test-command '("make" "test")))
(home-page "https://github.com/Dewdrops/evil-exchange";)
(synopsis "Exchange text easily within Evil")
@@ -18804,8 +18727,7 @@ surrounding lines.")
(build-system emacs-build-system)
(propagated-inputs (list emacs-evil))
(arguments
- `(#:tests? #t
- #:test-command '("make" "test")))
+ `(#:test-command '("make" "test")))
(home-page "https://github.com/edkolev/evil-lion";)
(synopsis "Align operator for @code{evil-mode}")
(description
@@ -18832,8 +18754,7 @@ aligning text objects based on separators.")
(build-system emacs-build-system)
(propagated-inputs (list emacs-evil))
(arguments
- `(#:tests? #t
- #:test-command '("make" "test")))
+ `(#:test-command '("make" "test")))
(home-page "https://github.com/edkolev/evil-expat";)
(synopsis "Extra @code{ex} commands for @code{evil-mode}")
(description
@@ -18930,8 +18851,7 @@ to search.")
(build-system emacs-build-system)
(home-page "https://ananthakumaran.in/monky/index.html";)
(arguments
- `(#:tests? #t
- #:test-command '("emacs" "--batch"
+ `(#:test-command '("emacs" "--batch"
"-l" "test/monky-unit-test.el"
"-f" "ert-run-tests-batch-and-exit")))
(synopsis "Interactive interface for the Mercurial version control system")
@@ -19085,7 +19005,6 @@ federated blogging platform WriteFreely.")
(build-system emacs-build-system)
(arguments
(list
- #:tests? #t
#:test-command #~(list "make" "test-dirty")
#:phases
#~(modify-phases %standard-phases
@@ -19710,8 +19629,7 @@ procedures for emacs-lisp-mode.")
(native-inputs
(list emacs-ert-runner))
(arguments
- `(#:tests? #t
- #:test-command '("ert-runner")))
+ `(#:test-command '("ert-runner")))
(home-page "https://github.com/Wilfred/ht.el";)
(synopsis "Hash table library for Emacs")
(description
@@ -20426,8 +20344,7 @@ the Emacs TempEl package.")
(search-patches "emacs-yasnippet-fix-empty-snippet-next.patch"))))
(build-system emacs-build-system)
(arguments
- `(#:tests? #t
- #:test-command '("emacs" "--batch"
+ `(#:test-command '("emacs" "--batch"
"-l" "yasnippet-tests.el"
"-f" "ert-run-tests-batch-and-exit")
#:phases
@@ -20697,8 +20614,7 @@ package.")
(base32 "04qgnlg4x6va7x364dhj1wbjmz8p5iq2vk36mn9198k2vxmijwzk"))))
(build-system emacs-build-system)
(arguments
- `(#:tests? #t
- #:test-command '("emacs" "--batch"
+ `(#:test-command '("emacs" "--batch"
"-l" "memoize-test.el"
"-f" "ert-run-tests-batch-and-exit")))
(home-page "https://github.com/skeeto/emacs-memoize";)
@@ -21037,7 +20953,6 @@ abbreviation of the mode line displays (lighters) of
minor modes.")
(build-system emacs-build-system)
(arguments
(list
- #:tests? #t
#:test-command #~(list "emacs" "--batch"
"-l" "use-package-tests.el"
"-f" "ert-run-tests-batch-and-exit")
@@ -21228,8 +21143,7 @@ fonts is supported.")
(base32 "096i29v0badx0a6339h9ckdz78zj59gbjdp7vj7vhkq9d830392s"))))
(build-system emacs-build-system)
(arguments
- `(#:tests? #t
- #:test-command '("emacs" "--batch"
+ `(#:test-command '("emacs" "--batch"
"-l" "xmlgen-test.el"
"-f" "ert-run-tests-batch-and-exit")))
(home-page "https://github.com/philjackson/xmlgen";)
@@ -21361,8 +21275,7 @@ reached with the right hand.")
(base32 "03cvl61baccx57zd62nz2wy4hvij5hl2syg7byaxgrs4c7grr414"))))
(build-system emacs-build-system)
(arguments
- '(#:tests? #t
- #:test-command '("make" "test")
+ '(#:test-command '("make" "test")
#:phases
(modify-phases %standard-phases
(add-before 'install 'make-info
@@ -21464,7 +21377,6 @@ in Emacs.")
(build-system emacs-build-system)
(arguments
(list
- #:tests? #true
#:test-command #~(list "emacs" "-Q" "--batch"
"-l" "../tests/php-mode-test.el"
"-f" "ert-run-tests-batch-and-exit")
@@ -21904,6 +21816,7 @@ conflicts.")
(arguments
(list
#:emacs emacs
+ #:tests? #f ; no test suite
#:phases
#~(modify-phases %standard-phases
(add-after 'expand-load-path 'regenerate-el-files
@@ -22235,8 +22148,7 @@ pressed simultaneously or a single key quickly pressed
twice.")
(propagated-inputs
(list emacs-evil))
(arguments
- `(#:tests? #t
- #:test-command '("make" "test")))
+ `(#:test-command '("make" "test")))
(home-page "https://github.com/emacs-evil/evil-surround";)
(synopsis "Easily modify surrounding parentheses and quotes")
(description "@code{emacs-evil-surround} allows easy deletion, change and
@@ -22266,8 +22178,6 @@ comment out lines of code in evil mode. It provides
@code{gcc} to comment out
lines, and @code{gc} to comment out the target of a motion.")
(license license:gpl3+)))
-;; Tests for emacs-ansi have a circular dependency with ert-runner, and
-;; therefore cannot be run
(define-public emacs-ansi
(let ((commit "2367fba7b3b2340364a30cd6de7f3eb6bb9898a3")
(revision "2"))
@@ -22284,6 +22194,9 @@ lines, and @code{gc} to comment out the target of a
motion.")
(sha256
(base32 "1n7h6l4icm6lks3zpvd83j1fzrnspw19rmz7c96vy7pdh1y4v3p3"))))
(build-system emacs-build-system)
+ ;; Tests for emacs-ansi have a circular dependency with ert-runner, and
+ ;; therefore cannot be run
+ (arguments (list #:tests? #f))
(home-page "https://github.com/rejeep/ansi.el";)
(synopsis "Convert strings to ANSI")
(description "@code{emacs-ansi} defines functions that turns simple
@@ -22292,8 +22205,6 @@ color to a text, add color in the background of a text
or adding a style, such
as bold, underscore or italic.")
(license license:gpl3+))))
-;; Tests for emacs-commander have a circular dependency with ert-runner, and
-;; therefore cannot be run
(define-public emacs-commander
(package
(name "emacs-commander")
@@ -22308,6 +22219,9 @@ as bold, underscore or italic.")
(sha256
(base32 "1j6hhyzww7wfwk6bllbb5mk4hw4qs8hsgfbfdifsam9c6i4spm45"))))
(build-system emacs-build-system)
+ ;; Tests for emacs-commander have a circular dependency with ert-runner,
and
+ ;; therefore cannot be run
+ (arguments (list #:tests? #f))
(propagated-inputs
(list emacs-dash emacs-f emacs-s))
(home-page "https://github.com/rejeep/commander.el";)
@@ -22501,8 +22415,6 @@ childfrme is selectable and scrollable with mouse, even
thought the cursor is
hidden.")
(license license:gpl3+)))
-;; Tests for ert-runner have a circular dependency with ecukes, and therefore
-;; cannot be run
(define-public emacs-ert-runner
(package
(name "emacs-ert-runner")
@@ -22526,8 +22438,11 @@ hidden.")
emacs-f
emacs-s
emacs-shut-up))
+ ;; Tests for ert-runner have a circular dependency with ecukes, and
therefore
+ ;; cannot be run
(arguments
- `(#:phases
+ `(#:tests? #f
+ #:phases
(modify-phases %standard-phases
(add-after 'install 'install-executable
(lambda* (#:key inputs outputs #:allow-other-keys)
@@ -22612,7 +22527,6 @@ running tests easier.")
(build-system emacs-build-system)
(arguments
(list
- #:tests? #true
#:test-command #~(list "emacs" "--batch"
"-l" "org-transclusion.el"
"-l" "test/unit-tests.el"
@@ -22665,8 +22579,7 @@ running a customisable handler command (@code{ignore}
by default).")
(patches (search-patches "emacs-json-reformat-fix-tests.patch"))))
(build-system emacs-build-system)
(arguments
- `(#:tests? #t
- #:test-command '("ert-runner")
+ `(#:test-command '("ert-runner")
#:phases
(modify-phases %standard-phases
(add-before 'check 'make-tests-writable
@@ -23081,8 +22994,7 @@ settings).")
"1hmawlnd2l89p48pviwn4khvjs0iry8x67cyqw70r10dd0ybn851"))))
(build-system emacs-build-system)
(arguments
- (list #:tests? #t
- #:test-command #~(list "emacs" "--batch"
+ (list #:test-command #~(list "emacs" "--batch"
"-l" "display-wttr-test.el"
"-f" "ert-run-tests-batch-and-exit")))
(home-page "https://git.sr.ht/~josegpt/display-wttr";)
@@ -23468,8 +23380,7 @@ at point.")
(propagated-inputs
(list emacs-popup))
(arguments
- `(#:tests? #t
- #:test-command '("emacs" "--batch" "-l" "test/test.el"
+ `(#:test-command '("emacs" "--batch" "-l" "test/test.el"
"-f" "ert-run-tests-batch-and-exit")))
(home-page "https://github.com/syohex/emacs-git-messenger";)
(synopsis "Popup commit message at current line")
@@ -23618,7 +23529,6 @@ with specific output formats.")
(build-system emacs-build-system)
(arguments
(list #:include #~(cons "^ruby/" %default-include)
- #:tests? #t
#:test-command ''("rake" "test:all")
#:phases #~(modify-phases %standard-phases
(add-after 'unpack 'set-default-ruby
@@ -23818,8 +23728,7 @@ the latest versions of Idris 1.")
(base32 "0bx4ns0jb0sqrjk1nsspvl3mhz3n12925azf7brlwb1vcgnji09v"))))
(build-system emacs-build-system)
(arguments
- `(#:tests? #t
- #:test-command '("ert-runner")))
+ `(#:test-command '("ert-runner")))
(native-inputs
(list emacs-ert-runner))
(propagated-inputs
@@ -23850,8 +23759,7 @@ It supports dired buffers and opens them in tree mode
at destination.")
"1498j392ap2mk4zmsm2id16pfgvj78r428da9vw7hdrzzibai2cx"))))
(build-system emacs-build-system)
(arguments
- `(#:tests? #t
- #:test-command '("make" "test")))
+ `(#:test-command '("make" "test")))
(home-page "https://github.com/abo-abo/tiny";)
(synopsis "Quickly generate linear ranges in Emacs")
(description
@@ -23983,7 +23891,6 @@ included by default, and more can be readily added.")
(build-system emacs-build-system)
(arguments
`(#:include (cons* "^tools/" "^data/" %default-include)
- #:tests? #t
#:test-command '("emacs" "--batch"
"-l" "unidecode-test.el"
"-f" "ert-run-tests-batch-and-exit")
@@ -24115,8 +24022,7 @@ part, which includes creating tokens.")
(base32 "1m2vnp38yv9fnxchcbf6mrzb7yp7z214vr28pr7sslrmm99dqg89"))))
(build-system emacs-build-system)
(arguments
- `(#:tests? #t
- #:test-command '("buttercup" "-L" ".")
+ `(#:test-command '("buttercup" "-L" ".")
#:emacs ,emacs ;requires gnutls
#:phases
(modify-phases %standard-phases
@@ -24669,7 +24575,6 @@ emulates Vim features and provides Vim-like key
bindings.")
(list emacs-evil))
(arguments
(list
- #:tests? #t
#:test-command #~'("emacs" "--batch"
"-l" "evil-quickscope-tests.el"
"-f" "ert-run-tests-batch-and-exit")
@@ -24737,8 +24642,7 @@ supports multiple backends such as @code{vlc},
@code{mpg123},
"1jpfyqnqd8nj0g8xbiw4ar2qzxx3pvhwibr6hdzhyy9mmc4yzdgk"))))
(build-system emacs-build-system)
(arguments
- `(#:tests? #t
- #:test-command '("ert-runner")))
+ `(#:test-command '("ert-runner")))
(native-inputs
(list emacs-ert-runner emacs-undercover emacs-shut-up emacs-f))
(propagated-inputs
@@ -24791,8 +24695,7 @@ from @code{groovy-mode} for editing Jenkins declarative
pipeline files.")
(base32 "09inpgwmnnqaakyn4r4xs8kax8b89dw94kvl521x6d43h9zl5i70"))))
(build-system emacs-build-system)
(arguments
- `(#:tests? #t
- #:test-command '("ert-runner" "-L" "." "-L" "test")))
+ `(#:test-command '("ert-runner" "-L" "." "-L" "test")))
(native-inputs (list emacs-ert-runner))
(home-page
"https://github.com/Emacs-Kotlin-Mode-Maintainers/kotlin-mode";)
(synopsis "Major major-mode for editing Kotlin files")
@@ -24896,8 +24799,7 @@ formatting rules for that language.")
(search-patches "emacs-kv-fix-tests.patch"))))
(build-system emacs-build-system)
(arguments
- `(#:tests? #t
- #:test-command '("emacs" "--batch" "-l" "kv-tests.el"
+ `(#:test-command '("emacs" "--batch" "-l" "kv-tests.el"
"-f" "ert-run-tests-batch-and-exit")))
(home-page "https://github.com/nicferrier/emacs-kv";)
(synopsis "Key/Value data structures library for Emacs Lisp")
@@ -25359,8 +25261,7 @@ needed.")
(base32 "0g48z5w6n3c54zqfpx65dfyl9jqbl15idvbb1hhw2pd9f9r8fykk"))))
(build-system emacs-build-system)
(arguments
- `(#:tests? #t
- #:test-command '("emacs" "--batch"
+ `(#:test-command '("emacs" "--batch"
"-L" "."
"-l" "test/auth-source-pass-tests.el"
"-f" "ert-run-tests-batch-and-exit")))
@@ -25565,7 +25466,6 @@ object has been freed.")
(build-system emacs-build-system)
(arguments
(list
- #:tests? #t
#:test-command #~(list "make" "test")
#:phases
#~(modify-phases %standard-phases
@@ -25885,7 +25785,6 @@ as well as functions for navigating between these
headings.")
(build-system emacs-build-system)
(arguments
(list
- #:tests? #t
#:test-command #~(list "emacs" "--batch" "-l" "org-recur-test.el"
"-f" "ert-run-tests-batch-and-exit")))
(propagated-inputs (list emacs-dash))
@@ -25940,7 +25839,6 @@ calendars provide.")
(build-system emacs-build-system)
(arguments
(list
- #:tests? #true
#:test-command #~(list "test/run" "--debug")
#:phases
#~(modify-phases %standard-phases
@@ -26057,7 +25955,6 @@ tables of contents.")
;; The failing tests all have similar problems, but nothing else about
;; the library seems particularly off.
(list
- #:tests? #t
#:test-command #~(list "emacs" "--batch"
"-l" "test/test.el"
"-f" "ert-run-tests-batch-and-exit")
@@ -26105,7 +26002,6 @@ timestamps by providing a @code{ts} struct.")
(build-system emacs-build-system)
(arguments
(list
- #:tests? #t
#:test-command
#~(list "emacs" "-Q" "--batch"
"-l" "test.el"
@@ -26164,7 +26060,6 @@ according to a parsing expression grammar.")
(build-system emacs-build-system)
(arguments
(list
- #:tests? #t
#:test-command #~(list "./bin/eldev" "-p" "-dtTC" "test")
#:phases
#~(modify-phases %standard-phases
@@ -26467,7 +26362,6 @@ automatically fetched from well-curated sources, and
formatted as BibTeX.")
(arguments
(list
#:emacs emacs-no-x
- #:tests? #true
#:test-command #~(list "emacs" "--batch" "-L" "."
"-l" "test/citar-test.el"
"-l" "test/citar-file-test.el"
@@ -27040,8 +26934,7 @@ the tailed file. It works locally or on remote files
using Tramp.")
(native-inputs
(list emacs-ert-runner emacs-undercover))
(arguments
- `(#:tests? #t
- #:test-command '("ert-runner")))
+ `(#:test-command '("ert-runner")))
(home-page "https://github.com/Wilfred/loop.el";)
(synopsis "Imperative loop structures for Emacs")
(description "Loop structures familiar to users of other languages. This
@@ -27074,7 +26967,6 @@ continue.")
(list emacs-ert-runner emacs-undercover))
(arguments
(list
- #:tests? #t
#:test-command #~(list "ert-runner")))
(home-page "https://github.com/Wilfred/elisp-refs";)
(synopsis "Find callers of elisp functions or macros")
@@ -27232,8 +27124,7 @@ macro takes a first argument (whose value must be an
alist) and a body.")
(propagated-inputs
(list emacs-dash))
(arguments
- `(#:tests? #t
- #:test-command '("buttercup" "-L" ".")))
+ `(#:test-command '("buttercup" "-L" ".")))
(home-page "https://github.com/jschaf/esup";)
(synopsis "Emacs start up profiler")
(description "Benchmark Emacs Startup time without ever leaving
@@ -27393,7 +27284,6 @@ without disturbing alignment.")
(build-system emacs-build-system)
(arguments
(list
- #:tests? #t
#:phases
#~(modify-phases %standard-phases
(add-before 'check 'remove-test
@@ -27466,7 +27356,6 @@ expansions for debugging with Edebug as normal.")
(build-system emacs-build-system)
(arguments
(list
- #:tests? #t
#:test-command #~(list "emacs" "--batch"
"-l" "parent-mode-test.el"
"-f" "ert-run-tests-batch-and-exit")))
@@ -28162,8 +28051,7 @@ downloading manager for Emacs.")
(native-inputs
(list emacs-ert-runner emacs-undercover))
(arguments
- `(#:tests? #t
- #:test-command '("ert-runner")))
+ `(#:test-command '("ert-runner")))
(home-page "https://github.com/Wilfred/helpful";)
(synopsis "More contextual information in Emacs help")
(description "@code{helpful} is an alternative to the built-in Emacs help
@@ -28234,8 +28122,7 @@ and doesn't require memorisation of commands.
(native-inputs
(list emacs-ert-runner emacs-undercover))
(arguments
- `(#:tests? #t
- #:test-command '("ert-runner")))
+ `(#:test-command '("ert-runner")))
(synopsis "Suggest Elisp functions that give the output requested")
(description "Suggest.el will find functions that give the output
requested. It's a great way of exploring list, string and arithmetic
@@ -28442,8 +28329,7 @@ browse the phrases by the paper section and fill-in the
blanks if required.")
"0ifzbwnm2axb8kmfp3jvg05wq02j121iwp2m64pi70c7mza0i886"))))
(build-system emacs-build-system)
(arguments
- '(#:tests? #t
- #:test-command '("make" "test")))
+ '(#:test-command '("make" "test")))
(propagated-inputs
(list emacs-yasnippet))
(home-page "https://github.com/abo-abo/auto-yasnippet/";)
@@ -29253,8 +29139,7 @@ scroll up to read the function name and then scroll
down to original position.")
(native-inputs
(list emacs-buttercup git))
(arguments
- `(#:tests? #t
- #:test-command '("buttercup" "-L" ".")))
+ `(#:test-command '("buttercup" "-L" ".")))
(home-page "https://github.com/ryuslash/git-auto-commit-mode";)
(synopsis "Emacs Minor mode to automatically commit and push")
(description "@code{git-auto-commit-mode} is an Emacs minor mode that
@@ -29445,8 +29330,7 @@ for editing Devicetree files.")
(base32 "1pr9yf6f37sz5qy1snn8ag5bvg6lza7q635jh8jhaqqfp37jvv1y"))))
(build-system emacs-build-system)
(arguments
- (list #:tests? #true
- #:test-command #~(list "make" "tests")))
+ (list #:test-command #~(list "make" "tests")))
(home-page "https://github.com/susam/devil";)
(synopsis "Minor mode for translating key sequences")
(description
@@ -29702,7 +29586,6 @@ Org-mode file, and citations of Zotero items in Pandoc
Markdown files.")
(("@cask exec ") ""))
(substitute* "test/test-helper.el"
(("'\\(evil iedit\\)") "nil")))))
- #:tests? #t
#:test-command '("make" "test")))
(home-page "https://github.com/hlissner/evil-multiedit";)
(synopsis "Multiple cursors for Evil mode")
@@ -29954,7 +29837,6 @@ the GIF result.")
(build-system emacs-build-system)
(arguments
(list
- #:tests? #t
#:test-command #~(list "emacs" "-Q" "--batch"
"-L" "."
"-l" "gt-tests.el"
@@ -30017,7 +29899,6 @@ on-line service.")
(build-system emacs-build-system)
(arguments
(list
- #:tests? #true
#:test-command #~(list "make" "test")))
(propagated-inputs (list emacs-popup))
(home-page "https://github.com/mhayashi1120/Emacs-langtool";)
@@ -30073,8 +29954,7 @@ tracking.")
(native-inputs
(list emacs-ert-runner))
(arguments
- (list #:tests? #t
- #:test-command #~(list "ert-runner")))
+ (list #:test-command #~(list "ert-runner")))
(home-page "https://github.com/Sodel-the-Vociferous/helm-company";)
(synopsis "Helm interface for Company mode")
(description
@@ -30416,8 +30296,7 @@ feeding them to package.el library.")
(base32 "1vb358jyfs3px70ah60dmlz5azdfkva9xrw3mgrr4060vcy7w4q1"))))
(build-system emacs-build-system)
(arguments ; needed for running tests
- `(#:tests? #t
- #:emacs ,emacs
+ `(#:emacs ,emacs
#:test-command '("emacs" "--batch"
"-l" "picpocket-test.el"
"-f" "ert-run-tests-batch-and-exit")))
@@ -30588,7 +30467,6 @@ them in your web browser.")
(build-system emacs-build-system)
(arguments
(list
- #:tests? #t
#:test-command #~(list "emacs" "--batch"
"-l" "tests/srht-test.el"
"-f" "ert-run-tests-batch-and-exit")
@@ -30653,7 +30531,6 @@ turn.")
(list emacs-buttercup emacs-undercover))
(arguments
(list
- #:tests? #t
#:test-command #~(list "buttercup" "-L" "test/github-review-test.el")
#:phases
#~(modify-phases %standard-phases
@@ -30707,7 +30584,6 @@ Requests from magit.")
(build-system emacs-build-system)
(arguments
(list
- #:tests? #t
#:test-command #~(list "ert-runner")
#:phases
#~(modify-phases %standard-phases
@@ -31046,7 +30922,6 @@ modes and text viewing modes respectively.")
"adoctest-test-tempo-paragraphs"
"adoctest-test-tempo-passthroug-macros"
"adoctest-test-tempo-quotes"))))))
- #:tests? #t
#:test-command #~(list "emacs" "-Q" "-batch"
"-l" "test/adoc-mode-test.el"
"-f" "ert-run-tests-batch-and-exit")))
@@ -31075,8 +30950,7 @@ files. It focuses on highlighting the document to
improve readability.")
(sha256
(base32 "12a429lajk09qp1jxgig54p8z6wndfgr4jwdmgkc9s2df9sw02d3"))))
(arguments
- `(#:tests? #t
- #:test-command '("ert-runner")))
+ `(#:test-command '("ert-runner")))
(native-inputs
(list emacs-ert-runner emacs-undercover))
(propagated-inputs
@@ -32300,7 +32174,6 @@ RPC channels with users and other software.")
(lambda _
(setenv "SHELL" (which "sh"))
#t)))
- #:tests? #t
#:test-command '("make" "test")))
(home-page "https://github.com/vspinu/sesman";)
(synopsis "Session manager for Emacs based IDEs")
@@ -32327,7 +32200,6 @@ targets the Emacs based IDEs (CIDER, ESS, Geiser, Robe,
SLIME etc.)")
(build-system emacs-build-system)
(arguments
(list
- #:tests? #t
#:test-command #~(list "make" "test")
#:phases
#~(modify-phases %standard-phases
@@ -32360,8 +32232,7 @@ functions to ensure they are called with the right
arguments during testing.")
(propagated-inputs
(list emacs-ansi))
(arguments
- `(#:tests? #t
- #:test-command '("emacs" "--batch" "--quick"
+ `(#:test-command '("emacs" "--batch" "--quick"
"--directory=." "--load=cort-tests.el"
"--funcall=cort-test-run")))
(home-page "https://github.com/conao3/cort.el";)
@@ -32493,7 +32364,6 @@ Arduino sketches and Org Babel support.")
(substitute* "Makefile"
(("cask exec ") ""))
#t)))
- #:tests? #t
#:test-command '("make" "test")))
(home-page "https://github.com/noctuid/annalist.el";)
(synopsis "Record and display information with Org headings and tables")
@@ -32520,8 +32390,7 @@ advice to be recorded and displayed.")
(native-inputs
(list emacs-buttercup emacs-evil emacs-which-key emacs-use-package))
(arguments
- `(#:tests? #t
- #:test-command '("buttercup" "-L" "test/test-general.el")))
+ `(#:test-command '("buttercup" "-L" "test/test-general.el")))
(home-page "https://github.com/noctuid/general.el";)
(synopsis "More convenient key definitions in emacs")
(description "@code{general.el} provides a more convenient method for
@@ -32866,7 +32735,6 @@ from Emacs.")
(build-system emacs-build-system)
(arguments
(list
- #:tests? #t
#:test-command #~(list "ert-runner")))
(native-inputs
(list emacs-ert-runner))
@@ -32945,7 +32813,6 @@ instances (play/pause, volume control, media selection,
etc.) remotely.")
(build-system emacs-build-system)
(arguments
(list
- #:tests? #t
#:test-command #~(list "ert-runner")))
(native-inputs
(list emacs-ert-runner))
@@ -32981,7 +32848,6 @@ tabulated-lists).")
(build-system emacs-build-system)
(arguments
(list
- #:tests? #t
#:include #~(cons* "^term/"
"^terminfo/"
"^integration/"
@@ -33209,7 +33075,6 @@ according to their use.")
"0dvvyqc0nw9has54vps10f5iv831cb29vqvbvx0m2djv9pacqp17"))))
(arguments
(list
- #:tests? #t
#:test-command #~(list "ert-runner")
#:phases
#~(modify-phases %standard-phases
@@ -33294,6 +33159,7 @@ inserting a new line with the same indentation level as
the current line.")
(base32
"0y8j3hf5r69fxj2vsbaxwr9qdchddn53w25xzmxv1kfh6hbagzv3"))))
(build-system emacs-build-system)
+ (arguments (list #:tests? #f)) ; tests require networking
(native-inputs
(list emacs-el-mock emacs-ert-runner))
(propagated-inputs
@@ -33319,7 +33185,6 @@ buffer and launches Magit from the status buffer for
the project at point.")
(build-system emacs-build-system)
(arguments
(list
- #:tests? #t
#:test-command
#~(list "emacs" "-Q" "-batch"
"-l" "repology-tests.el"
@@ -33926,8 +33791,7 @@ indexing of modern Fortran.")
(file-name (git-file-name name version))))
(build-system emacs-build-system)
(arguments
- (list #:tests? (not (%current-target-system))
- #:test-command #~'("ert-runner")))
+ (list #:test-command #~'("ert-runner")))
(native-inputs (list emacs-ert-runner))
(home-page "https://github.com/plattfot/bfuture.el";)
(synopsis "Basic future concept for Emacs with Tramp support")
@@ -34511,8 +34375,7 @@ packages with a consistent way to use them.")
"00rqz63bhh66q78l646q3w16gydygj8h4d8np0dpbifgzciak90b"))))
(build-system emacs-build-system)
(arguments
- `(#:tests? #t
- #:test-command '("make" "test")))
+ `(#:test-command '("make" "test")))
(home-page "https://github.com/jackkamm/undo-propose-el";)
(synopsis "Simple and safe navigation of @code{undo} history")
(description "This package permits navigation of @code{undo} history in a
@@ -34789,8 +34652,7 @@ done using Helm, Ido or Ivy.")
(native-inputs
(list emacs-ert-runner emacs-undercover))
(arguments
- `(#:tests? #t
- #:test-command '("ert-runner")))
+ `(#:test-command '("ert-runner")))
(home-page "https://github.com/Wilfred/tco.el";)
(synopsis "Tail-call optimization for Emacs Lisp")
(description "This package provides tail-call optimization for Emacs
@@ -34841,8 +34703,7 @@ compatible with Emacs' shell modes.")
(propagated-inputs
(list emacs-hydra))
(arguments
- `(#:tests? #t
- #:test-command '("emacs" "-Q" "-batch" "-L" "."
+ `(#:test-command '("emacs" "-Q" "-batch" "-L" "."
"-l" "vdiff-test.el"
"-f" "ert-run-tests-batch-and-exit")))
(home-page "https://github.com/justbur/emacs-vdiff/";)
@@ -35041,7 +34902,6 @@ keypresses mapped in firefox to the action described in
the function name.")
#~(modify-phases %standard-phases
(add-after 'unpack 'chdir
(lambda _ (chdir "lisp"))))
- #:tests? #true
#:test-command #~(list "emacs" "-Q" "--batch"
"-l" "../test/exwm-firefox--tests.el"
"-l" "exwm-firefox.el"
@@ -35253,8 +35113,7 @@ definition-jumping and type-checking on demand.")
(propagated-inputs
(list emacs-js2-mode))
(arguments
- `(#:tests? #t
- #:test-command '("make" "test")
+ `(#:test-command '("make" "test")
#:phases
(modify-phases %standard-phases
(add-after 'unpack 'js2-number-tests
@@ -35498,8 +35357,7 @@ and takes advantage of the org-ql cache.")))
(native-inputs
(list emacs-undercover emacs-ert-runner))
(arguments
- `(#:tests? #t
- #:test-command '("ert-runner")
+ `(#:test-command '("ert-runner")
#:phases
;; this test requires network access, so remove it
(modify-phases %standard-phases
@@ -35748,8 +35606,7 @@ all of your projects, then override or add variables on
a per-project basis.")
"1hmr0zzwm3f88786j8p8x39jn5b8jja37x1iww4vd83dsvkksbpa"))))
(build-system emacs-build-system)
(arguments
- (list #:tests? #t
- #:test-command #~(list "make" "tests")
+ (list #:test-command #~(list "make" "tests")
#:phases
#~(modify-phases %standard-phases
(add-after 'unpack 'move-source-files
@@ -36285,7 +36142,6 @@ functions (e.g. @code{webfeeder-title-function}).")
(build-system emacs-build-system)
(arguments
(list
- #:tests? #t
#:test-command #~(list "emacs" "--batch"
"-l" "evil-numbers.el"
"-l" "tests/evil-numbers-tests.el"
@@ -36547,7 +36403,6 @@ programming in Emacs Lisp easy and fun.")
(build-system emacs-build-system)
(arguments
(list
- #:tests? #t
#:test-command #~(list "make" "test")
#:phases
#~(modify-phases %standard-phases
@@ -37050,7 +36905,6 @@ simple but powerful Org contents.")
(arguments
(list
#:include #~(cons "^src/" %default-include)
- #:tests? #t
#:test-command #~(list "eldev" "--use-emacsloadpath" "-dtTC" "test")))
(native-inputs (list emacs-buttercup emacs-eldev))
(propagated-inputs (list emacs-org))
@@ -37377,7 +37231,6 @@ contains a track position, playback will start at the
specified position.")
(build-system emacs-build-system)
(arguments
(list
- #:tests? #true
#:test-command #~(list "emacs" "-Q" "--batch"
"-l" "jiralib.el"
"-l" "org-jira-sdk.el"
@@ -37456,7 +37309,6 @@ count matches, etc.")
(build-system emacs-build-system)
(arguments
(list #:include #~(cons* "\\.txt$" %default-include)
- #:tests? #true
#:test-command #~(list "emacs" "-Q" "--batch"
"-L" "."
"-l" "test/systemd-tests.el"
@@ -37664,8 +37516,7 @@ contrast and few colors.")
(native-inputs
(list emacs-ert-runner))
(arguments
- (list #:tests? #t
- #:test-command #~(list "ert-runner")
+ (list #:test-command #~(list "ert-runner")
#:modules '((guix build emacs-build-system)
(guix build utils)
(guix build emacs-utils)
@@ -39817,8 +39668,7 @@ emoji.")
"0bv58is66cz21yhc0qqkp1z4nk13zfi2l7i6pjbhyi0g1n88qqyv"))))
(build-system emacs-build-system)
(arguments
- `(#:tests? #t
- #:test-command '("make" "-C" "tests")
+ `(#:test-command '("make" "-C" "tests")
#:phases
(modify-phases %standard-phases
(add-after 'unpack 'configure
@@ -39873,8 +39723,7 @@ supports generation of phonetic and numeric passwords.")
"0yrshahci319lnjdpsksdy11a69k1n91qk9r2zfyhqmng09s6i0y"))))
(build-system emacs-build-system)
(arguments
- (list #:tests? #t
- #:test-command #~(list "emacs" "-Q" "--batch"
+ (list #:test-command #~(list "emacs" "-Q" "--batch"
"-l" "qrencode.el"
"-l" "qrencode-tests.el"
"-f" "ert-run-tests-batch-and-exit")))
@@ -39925,7 +39774,6 @@ Files} (@url{http://tools.ietf.org/html/rfc4180}).")
(build-system emacs-build-system)
(arguments
(list
- #:tests? #true
#:test-command #~(list "emacs" "-Q" "--batch"
"-L" "."
"-l" "tests/org-journal-test"
@@ -40004,7 +39852,6 @@ a @samp{date} keywords, and optionally, a
@samp{filetags} keyword.")
(build-system emacs-build-system)
(arguments
(list
- #:tests? #t
#:test-command #~(list "emacs" "--quick" "--batch"
"-l" "t/weblorg-tests.el"
"-f" "ert-run-tests-batch-and-exit")))
@@ -40656,8 +40503,7 @@ or region and use of locally installed binaries.")
(propagated-inputs
(list emacs-s))
(arguments
- `(#:tests? #t
- #:test-command '("emacs" "-Q" "-batch" "-L" "."
+ `(#:test-command '("emacs" "-Q" "-batch" "-L" "."
"-l" "t/indent.el"
"-f" "ert-run-tests-batch-and-exit")))
(home-page "https://gitlab.com/KAction/emacs-execline/";)
@@ -41681,8 +41527,7 @@ released, and track their progress in watching a
series.")
(base32 "1wl2q4q7c2a1m60q4dnajsyzkc9yprkyzx4hxzmxkwry22k906x3"))))
(build-system emacs-build-system)
(arguments
- `(#:tests? #t
- #:test-command '("make" "unit" "integration")
+ `(#:test-command '("make" "unit" "integration")
#:phases
(modify-phases %standard-phases
(add-after 'unpack 'fix-tests
@@ -41729,8 +41574,7 @@ and preferred services can easily be configured.")
(base32 "06cznkqkm04zz5lqfb514aqvsr2p13arzysixv0ss0bqpvdq7cv7"))))
(build-system emacs-build-system)
(arguments
- `(#:tests? #t
- #:test-command
+ `(#:test-command
'("emacs" "--no-init-file" "--batch"
"--eval=(require 'ecukes)" "--eval=(ecukes)")))
(native-inputs
@@ -42033,7 +41877,6 @@ execute code split into cells according to certain
magic comments.")
(build-system emacs-build-system)
(arguments
(list
- #:tests? #true
#:test-command
#~(list "emacs" "-Q" "--batch"
"-L" "test"
@@ -42585,8 +42428,12 @@ on the chosen style."))))
(build-system emacs-build-system)
(arguments
(list
- #:tests? #t
- #:test-command '(list "make" "tests")
+ #:test-command
+ #~(list "emacs" "-Q" "--batch"
+ "-L" "."
+ "--load" "ert"
+ "--load" "tests/straight-test.el"
+ "--eval" "(progn (require 'straight-ert-print-hack)
(ert-run-tests-batch-and-exit))")
#:phases
#~(modify-phases %standard-phases
(add-after 'unpack 'patch-git-executable
@@ -42884,7 +42731,6 @@ projects.")
(build-system emacs-build-system)
(arguments
(list
- #:tests? #true
#:test-command #~(list "emacs" "-Q" "--batch"
"-l" "vundo.el"
"-l" "test/vundo-test.el"
@@ -42941,7 +42787,6 @@ should pop up.")
(build-system emacs-build-system)
(arguments
(list
- #:tests? #t
#:test-command #~(list "ert-runner")
#:phases
#~(modify-phases %standard-phases
@@ -43514,7 +43359,6 @@ accomplish different tasks.")
(build-system emacs-build-system)
(arguments
(list
- #:tests? #true
#:test-command #~(list "emacs" "-Q" "--batch"
"-l" "x509-mode.el"
"-l" "x509-mode-tests.el"
diff --git a/guix/build-system/emacs.scm b/guix/build-system/emacs.scm
index 06eec43ec4..2ec08fe878 100644
--- a/guix/build-system/emacs.scm
+++ b/guix/build-system/emacs.scm
@@ -82,7 +82,7 @@
(define* (emacs-build name inputs
#:key source
- (tests? #f)
+ (tests? (not (%current-target-system)))
(parallel-tests? #t)
(test-command ''("make" "check"))
(phases '%standard-phases)
