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

commit 87abcc296f7edc5d3af46c044da29756f6cd5a26
Author: Liliana Marie Prikler <liliana.prik...@gmail.com>
AuthorDate: Sun Mar 23 11:21:36 2025 +0100

    gnu: emacs-dashboard: Fix tests.
    
    * gnu/packages/emacs-xyz.scm (emacs-dashboard)[arguments]: Add 
#:test-command.
    <#:phases>: Add ‘fix-test’.
    [native-inputs]: Add emacs-ert-runner.
---
 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 ccafc7e737..c7a89949ad 100644
--- a/gnu/packages/emacs-xyz.scm
+++ b/gnu/packages/emacs-xyz.scm
@@ -29274,9 +29274,20 @@ Emacs minor mode to escape sequences in code.")
         (base32 "1m39alr4vi22wr0yd22yi3qkdykwh8vmkdlbbd8qm9z1g7mvl382"))))
     (build-system emacs-build-system)
     (arguments
-     (list #:include #~(cons* "\\.txt$" "\\.png$" %default-include)))
+     (list #:include #~(cons* "\\.txt$" "\\.png$" %default-include)
+           #:test-command #~(list "ert-runner"
+                                  "-L" "."
+                                  "-l" "test/activate.el")
+           #:phases
+           #~(modify-phases %standard-phases
+               (add-before 'check 'fix-test
+                 (lambda _
+                   (substitute* "test/activate.el"
+                     (("\\(dashboard-setup-startup-hook\\)" all)
+                      (string-append "(require 'dashboard)" all))))))))
     (propagated-inputs
      (list emacs-page-break-lines))
+    (native-inputs (list emacs-ert-runner))
     (home-page "https://github.com/rakanalh/emacs-dashboard";)
     (synopsis "Startup screen extracted from Spacemacs")
     (description "This package provides an extensible Emacs dashboard, with

Reply via email to