guix_mirror_bot pushed a commit to branch master
in repository guix.
commit c652706ac5c50986d2ef8f03bfa44dcaa38b0689
Author: Nicolas Graves <[email protected]>
AuthorDate: Thu Mar 20 11:08:53 2025 +0100
gnu: emacs-racket-mode: Fix tests.
* gnu/packages/emacs-xyz.scm (emacs-racket-mode)
[arguments]{test-command}: Set it.
{phases}: Add phase 'pre-check and skip failing tests.
Signed-off-by: Liliana Marie Prikler <[email protected]>
---
gnu/packages/emacs-xyz.scm | 13 ++++++++++++-
1 file changed, 12 insertions(+), 1 deletion(-)
diff --git a/gnu/packages/emacs-xyz.scm b/gnu/packages/emacs-xyz.scm
index 045146b8e6..90b58405b0 100644
--- a/gnu/packages/emacs-xyz.scm
+++ b/gnu/packages/emacs-xyz.scm
@@ -28988,7 +28988,18 @@ perform regression test for packages that provide
font-lock rules.")
(build-system emacs-build-system)
(arguments
(list
- #:include #~(list "\\.el$" "\\.rkt$")))
+ #:include #~(list "\\.el$" "\\.rkt$")
+ #:test-command #~(list "make" "test")
+ #:phases
+ #~(modify-phases %standard-phases
+ (add-before 'check 'pre-check
+ (lambda _
+ (setenv "HOME" (dirname (getcwd)))
+ (substitute* "test/racket-tests.el"
+ (("\\(ert-deftest racket-tests/(repl|run) .*" all)
+ (string-append all "(skip-unless nil)"))))))))
+ (native-inputs
+ (list racket))
(propagated-inputs
(list emacs-faceup emacs-paredit emacs-pos-tip emacs-s))
(home-page "https://www.racket-mode.com/";)
