1
Fork 0
mirror of https://https.git.savannah.gnu.org/git/guix.git/ synced 2025-07-16 12:00:35 +02:00

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.
This commit is contained in:
Liliana Marie Prikler 2025-03-23 11:47:20 +01:00
parent 041b7318b3
commit 6c10897e40
No known key found for this signature in database
GPG key ID: 442A84B8C70E2F87

View file

@ -8459,6 +8459,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
@ -8467,9 +8468,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