lilyp pushed a commit to branch emacs-team
in repository guix.
commit 699c80d1e61e248d14e612a448aa995868edf6a6
Author: Liliana Marie Prikler <liliana.prik...@gmail.com>
AuthorDate: Sun Mar 23 11:47:20 2025 +0100
gnu: emacs-rg: Fix tests.
* gnu/packages/emacs-xyz.scm (emacs-rg)[arguments]: Add #:test-command.
<#:phases>: Add ‘skip-failing-tests’.
[native-inputs]: Add emacs-ert-runner.
---
gnu/packages/emacs-xyz.scm | 9 ++++++++-
1 file changed, 8 insertions(+), 1 deletion(-)
diff --git a/gnu/packages/emacs-xyz.scm b/gnu/packages/emacs-xyz.scm
index f657bc094c..e16f7ab505 100644
--- a/gnu/packages/emacs-xyz.scm
+++ b/gnu/packages/emacs-xyz.scm
@@ -8281,6 +8281,7 @@ result.")
(build-system emacs-build-system)
(arguments
(list
+ #:test-command #~(list "ert-runner" "--pattern" "rg-unit")
#:phases
#~(modify-phases %standard-phases
(add-after 'unpack 'remove-rg-path
@@ -8289,9 +8290,15 @@ result.")
(let ((file "rg.el"))
(make-file-writable file)
(emacs-substitute-sexps file
- ("(defcustom rg-executable" "rg"))))))))
+ ("(defcustom rg-executable" "rg")))))
+ (add-before 'check 'skip-failing-tests
+ (lambda _
+ (substitute* "test/rg-isearch.el-test.el"
+ (("\\(ert-deftest rg-unit/isearch-project.*" all)
+ (string-append all " (skip-unless nil)"))))))))
(propagated-inputs
(list emacs-s emacs-wgrep ripgrep))
+ (native-inputs (list emacs-ert-runner))
(home-page "https://rgel.readthedocs.io/en/latest/";)
(synopsis "Search tool based on @code{ripgrep}")
(description
