[bug#78095,18/28] gnu: emacs-scratch-el: Skip tests.

Message ID 20250427145307.16022-18-ngraves@ngraves.fr
State New
Headers
Series More emacs-team updates. |

Commit Message

Nicolas Graves April 27, 2025, 2:52 p.m. UTC
  * gnu/packages/emacs-xyz.scm (emacs-scratch-el):
  [arguments]<tests?>: Skip tests.
  <phases>: Add phase 'install-doc.
---
 gnu/packages/emacs-xyz.scm | 19 +++++++++----------
 1 file changed, 9 insertions(+), 10 deletions(-)
  

Patch

diff --git a/gnu/packages/emacs-xyz.scm b/gnu/packages/emacs-xyz.scm
index c1069a7d6f..0edb07bd5c 100644
--- a/gnu/packages/emacs-xyz.scm
+++ b/gnu/packages/emacs-xyz.scm
@@ -24992,16 +24992,15 @@  (define-public emacs-scratch-el
     (native-inputs
      (list texinfo))
     (arguments
-     '(#:phases
-       (modify-phases %standard-phases
-         (add-after 'install 'install-doc
-           (lambda* (#:key outputs #:allow-other-keys)
-             (unless (invoke "makeinfo" "scratch.texi")
-               (error "makeinfo failed"))
-             (install-file "scratch.info"
-                           (string-append (assoc-ref outputs "out")
-                                          "/share/info"))
-             #t)))))
+     (list #:tests? #f ; No tests.
+           #:phases
+           #~(modify-phases %standard-phases
+               (add-after 'install 'install-doc
+                 (lambda _
+                   (unless (invoke "makeinfo" "scratch.texi")
+                     (error "makeinfo failed"))
+                   (install-file "scratch.info"
+                                 (string-append #$output "/share/info")))))))
     (home-page "https://codeberg.org/emacs-weirdware/scratch")
     (synopsis "Create scratch buffers with the same mode as current buffer")
     (description "Scratch is an extension to Emacs that enables one to create