lilyp pushed a commit to branch emacs-team
in repository guix.

commit ba50309664aed6d96a8a2a84e03f6e9ebaab33f7
Author: Liliana Marie Prikler <liliana.prik...@gmail.com>
AuthorDate: Sun Mar 23 08:48:17 2025 +0100

    gnu: emacs-ox-hugo: Fix tests.
    
    * gnu/packages/emacs-xyz.scm (emacs-ox-hugo)[arguments]: Add #:test-command.
    <#:phases>: Add ‘pre-check’.
    [native-inputs]: Add emacs-toc-org, emacs-citeproc-el, emacs-org-ref and
    emacs-org.
---
 gnu/packages/emacs-xyz.scm | 22 ++++++++++++++++++++++
 1 file changed, 22 insertions(+)

diff --git a/gnu/packages/emacs-xyz.scm b/gnu/packages/emacs-xyz.scm
index 5a34132b86..625a49dd0c 100644
--- a/gnu/packages/emacs-xyz.scm
+++ b/gnu/packages/emacs-xyz.scm
@@ -37170,8 +37170,30 @@ producing output appropriate for Haunt's 
@code{html-reader}.")
         (base32
          "054ln6x92qyicvc5l1m9yjqqzwpg3j66v0shxsypp97vfw2d3ww6"))))
     (build-system emacs-build-system)
+    (arguments
+     (list #:test-command #~(list "make" "ert")
+           #:phases
+           #~(modify-phases %standard-phases
+               (add-before 'check 'pre-check
+                 (lambda _
+                   (mkdir ".git")
+                   (call-with-output-file ".git/config"
+                     (const #t))
+                   (emacs-batch-edit-file "test/setup-ox-hugo.el"
+                     '(progn
+                       (search-forward "when ox-hugo-missing-packages")
+                       (beginning-of-line)
+                       (kill-sexp)
+                       (basic-save-buffer)))
+                   (mkdir ".ox-hugo-tmp")
+                   (setenv "OX_HUGO_TMP_DIR"
+                           (string-append (getcwd) "/.ox-hugo-tmp")))))))
     (propagated-inputs
      (list emacs-tomelr))
+    (native-inputs (list emacs-toc-org
+                         emacs-citeproc-el
+                         emacs-org-ref
+                         emacs-org))
     (home-page "https://ox-hugo.scripter.co";)
     (synopsis "Hugo markdown back-end for Org export engine")
     (description

Reply via email to