lilyp pushed a commit to branch emacs-team
in repository guix.
commit 5edecea8fed19d2c9c3949ed1d73fab109e5e2c7
Author: Nicolas Graves <ngra...@ngraves.fr>
AuthorDate: Thu Mar 20 11:08:44 2025 +0100
gnu: emacs-tomelr: Fix tests.
* gnu/packages/emacs-xyz.scm (emacs-tomelr)
[arguments]{test-command}: Set it.
{phases}: Add phase 'patch-tests to fix test run.
Signed-off-by: Liliana Marie Prikler <liliana.prik...@gmail.com>
---
gnu/packages/emacs-xyz.scm | 13 +++++++++++++
1 file changed, 13 insertions(+)
diff --git a/gnu/packages/emacs-xyz.scm b/gnu/packages/emacs-xyz.scm
index 7166f571e6..6b4545d7f2 100644
--- a/gnu/packages/emacs-xyz.scm
+++ b/gnu/packages/emacs-xyz.scm
@@ -42235,6 +42235,19 @@ local macros are documented in the docstring for
@code{setup}.")
(base32 "03iih7arjlfg8gdp4v2xglas9z519q1s11l28igr8l0m5y0pdrnk"))
(file-name (git-file-name name version))))
(build-system emacs-build-system)
+ (arguments
+ (list
+ #:test-command
+ #~(list "emacs" "--batch" "-L" "test" "-l" "all-tests.el"
+ "-f" "ert-run-tests-batch-and-exit")
+ #:phases
+ #~(modify-phases %standard-phases
+ (add-before 'check 'patch-tests
+ (lambda _
+ (setenv "HOME" (dirname (getcwd)))
+ (substitute* "test/all-tests.el"
+ (("\\(file-truename \\(vc-git-root default-directory\\)\\)")
+ (format #f "~s" (getcwd)))))))))
(propagated-inputs (list emacs-map emacs-seq))
(home-page "https://github.com/kaushalmodi/tomelr/";)
(synopsis "Emacs-Lisp library for converting S-expressions to TOML")
