Subject: [bug#77131] [PATCH 01/51] gnu: Add (gnu packages emacs-build) module.

From: Nicolas Graves <[email-masked]>
Date: Thu, 20 Mar 2025 11:08:09 +0100

Move there packages* gnu/packages/emacs-xyz.scm (emacs-ansi, emacs-buttercup,
emacs-compat, emacs-commander, emacs-dash, emacs-eldev, emacs-el-mock,
emacs-ert-async, emacs-ert-expectations, emacs-ert-runner, emacs-f,
emacs-package-lint, emacs-s, emacs-shut-up, emacs-undercover): Move variables...
* gnu/packages/emacs-build.scm: ...here.
---
 gnu/packages/admin.scm       |   2 +-
 gnu/packages/emacs-build.scm | 463 +++++++++++++++++++++++++++++++++++
 gnu/packages/emacs-xyz.scm   | 432 +-------------------------------
 gnu/packages/guile-xyz.scm   |   1 +
 4 files changed, 466 insertions(+), 432 deletions(-)
 create mode 100644 gnu/packages/emacs-build.scm

diff --git a/gnu/packages/admin.scm b/gnu/packages/admin.scm
index 1a7a577332..cc6f42d2be 100644
--- a/gnu/packages/admin.scm
+++ b/gnu/packages/admin.scm
@@ -137,7 +137,7 @@ (define-module (gnu packages admin)
   #:use-module (gnu packages debian)
   #:use-module (gnu packages dns)
   #:use-module (gnu packages elf)
-  #:use-module (gnu packages emacs-xyz) ; for emacs-ert-runner
+  #:use-module (gnu packages emacs-build) ; for emacs-ert-runner
   #:use-module (gnu packages file)
   #:use-module (gnu packages flex)
   #:use-module (gnu packages fonts)
diff --git a/gnu/packages/emacs-build.scm b/gnu/packages/emacs-build.scm
new file mode 100644
index 0000000000..78dfc1ed5b
--- /dev/null
+++ b/gnu/packages/emacs-build.scm
@@ -0,0 +1,463 @@
+;;; GNU Guix --- Functional package management for GNU
+;;; Copyright © 2025 Nicolas Graves <[email-masked]>
+;;;
+;;; This file is part of GNU Guix.
+;;;
+;;; GNU Guix is free software; you can redistribute it and/or modify it
+;;; under the terms of the GNU General Public License as published by
+;;; the Free Software Foundation; either version 3 of the License, or (at
+;;; your option) any later version.
+;;;
+;;; GNU Guix is distributed in the hope that it will be useful, but
+;;; WITHOUT ANY WARRANTY; without even the implied warranty of
+;;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;;; GNU General Public License for more details.
+;;;
+;;; You should have received a copy of the GNU General Public License
+;;; along with GNU Guix.  If not, see <http://www.gnu.org/licenses/>.
+
+(define-module (gnu packages emacs-build)
+  #:use-module ((guix licenses) #:prefix license:)
+  #:use-module (guix gexp)
+  #:use-module (guix download)
+  #:use-module (guix git-download)
+  #:use-module (guix packages)
+  #:use-module (guix build-system copy)
+  #:use-module (guix build-system emacs)
+  #:use-module (gnu packages)
+  #:use-module (gnu packages base)
+  #:use-module (gnu packages bash)
+  #:use-module (gnu packages emacs)
+  #:use-module (gnu packages linux)
+  #:use-module (gnu packages texinfo)
+  #:use-module (gnu packages version-control))
+
+(define-public emacs-ansi
+  (let ((commit "2367fba7b3b2340364a30cd6de7f3eb6bb9898a3")
+        (revision "2"))
+    (package
+      (name "emacs-ansi")
+      (version (git-version "0.4.1" revision commit))
+      (source
+       (origin
+         (method git-fetch)
+         (uri (git-reference
+               (url "https://github.com/rejeep/ansi.el")
+               (commit commit)))
+         (file-name (git-file-name name version))
+         (sha256
+          (base32 "1n7h6l4icm6lks3zpvd83j1fzrnspw19rmz7c96vy7pdh1y4v3p3"))))
+      (build-system emacs-build-system)
+      ;; Tests for emacs-ansi have a circular dependency with ert-runner, and
+      ;; therefore cannot be run
+      (arguments (list #:tests? #f))
+      (home-page "https://github.com/rejeep/ansi.el")
+      (synopsis "Convert strings to ANSI")
+      (description "@code{emacs-ansi} defines functions that turns simple
+strings to ANSI strings.  Turning a string into an ANSI string can be to add
+color to a text, add color in the background of a text or adding a style, such
+as bold, underscore or italic.")
+      (license license:gpl3+))))
+
+(define-public emacs-buttercup
+  (package
+    (name "emacs-buttercup")
+    (version "1.37")
+    (source
+     (origin
+       (method git-fetch)
+       (uri (git-reference
+             (url "https://github.com/jorgenschaefer/emacs-buttercup")
+             (commit (string-append "v" version))))
+       (file-name (git-file-name name version))
+       (sha256
+        (base32
+         "0gkw1lmy8ynralrs4xwqsd06ww09xk5yqjdgw4r5c0zhp5dxn4ky"))))
+    (build-system emacs-build-system)
+    (arguments
+     (list
+      #:test-command #~(list "make" "test")
+      #:phases
+      #~(modify-phases %standard-phases
+          (add-after 'install 'install-bin
+            (lambda _
+              (install-file "bin/buttercup"
+                            (string-append #$output "/bin")))))))
+    (home-page "https://github.com/jorgenschaefer/emacs-buttercup")
+    (synopsis "Behavior driven emacs lisp testing framework")
+    (description "Buttercup is a behavior-driven development framework for
+testing Emacs Lisp code.  It groups related tests so they can share
+common set-up and tear-down code, and allows the programmer to \"spy\" on
+functions to ensure they are called with the right arguments during testing.")
+    (license license:gpl3+)))
+
+(define-public emacs-compat
+  (package
+    (name "emacs-compat")
+    (version "30.0.2.0")
+    (source (origin
+              (method git-fetch)
+              (uri (git-reference
+                    (url "https://github.com/emacs-compat/compat")
+                    (commit version)))
+              (file-name (git-file-name name version))
+              (sha256
+               (base32
+                "020rn3l2sn0vzfhx30k47jd2cgvsddk0zfbizgb68hbajcxqfsl4"))))
+    (build-system emacs-build-system)
+    (home-page "https://elpa.gnu.org/packages/compat.html")
+    (synopsis "Emacs Lisp compatibility library")
+    (description
+     "To allow for the usage of Emacs functions and macros that are defined
+in newer versions of Emacs, @code{compat.el} provides definitions that
+are installed ONLY if necessary.  These reimplementations of functions
+and macros are at least subsets of the actual implementations.  Be
+sure to read the documentation string to make sure.
+
+Not every function provided in newer versions of Emacs is provided
+here.  Some depend on new features from the core, others cannot be
+implemented to a meaningful degree.  The main audience for this
+library are not regular users, but package maintainers.  Therefore
+commands and user options are usually not implemented here.")
+    (license license:gpl3+)))
+
+(define-public emacs-commander
+  (package
+    (name "emacs-commander")
+    (version "0.7.0")
+    (source
+     (origin
+       (method git-fetch)
+       (uri (git-reference
+             (url "https://github.com/rejeep/commander.el")
+             (commit (string-append "v" version))))
+       (file-name (git-file-name name version))
+       (sha256
+        (base32 "1j6hhyzww7wfwk6bllbb5mk4hw4qs8hsgfbfdifsam9c6i4spm45"))))
+    (build-system emacs-build-system)
+    ;; Tests for emacs-commander have a circular dependency with ert-runner, and
+    ;; therefore cannot be run
+    (arguments (list #:tests? #f))
+    (propagated-inputs
+     (list emacs-dash emacs-f emacs-s))
+    (home-page "https://github.com/rejeep/commander.el")
+    (synopsis "Emacs command line parser")
+    (description "@code{emacs-commander} provides command line parsing for
+Emacs.")
+    (license license:gpl3+)))
+
+(define-public emacs-dash
+  (package
+    (name "emacs-dash")
+    (version "2.19.1")
+    (source (origin
+              (method git-fetch)
+              (uri (git-reference
+                    (url "https://github.com/magnars/dash.el")
+                    (commit version)))
+              (file-name (git-file-name name version))
+              (sha256
+               (base32
+                "0z6f8y1m9amhg427iz1d4xcyr6n0kj5w7kmiz134p320ixsdnzd8"))))
+    (build-system emacs-build-system)
+    (arguments
+     (list #:phases
+           #~(modify-phases %standard-phases
+               (add-after 'unpack 'disable-byte-compile-error-on-warn
+                 (lambda _
+                   (substitute* "Makefile"
+                     (("\\(setq byte-compile-error-on-warn t\\)")
+                      "(setq byte-compile-error-on-warn nil)")))))))
+    (home-page "https://github.com/magnars/dash.el")
+    (synopsis "Modern list library for Emacs")
+    (description "This package provides a modern list API library for Emacs.")
+    (license license:gpl3+)))
+
+(define-public emacs-eldev
+  (package
+    (name "emacs-eldev")
+    (version "1.11.1")
+    (source
+     (origin
+       (method git-fetch)
+       (uri (git-reference
+             (url "https://github.com/emacs-eldev/eldev")
+             (commit version)))
+       (file-name (git-file-name name version))
+       (sha256
+        (base32 "0sf8xyzblc0fs2d65jgcycavnzmrp1wg0sfr29gjkq1kvzyl7phb"))))
+    (build-system emacs-build-system)
+    (arguments
+     (list
+      #:test-command #~(list "./bin/eldev" "-p" "-dtTC" "test")
+      #:phases
+      #~(modify-phases %standard-phases
+          (add-after 'unpack 'prepare-for-tests
+            (lambda _
+              (setenv "ELDEV_LOCAL" (getcwd))
+              (make-file-writable "test/project-i/project-i-autoloads.el")))
+          (add-after 'unpack 'skip-failing-tests
+            ;; FIXME: 2 tests are failing.  Skip them for now.
+            (lambda _
+              (delete-file "test/upgrade-self.el")))
+          (add-after 'install 'install-eldev-executable
+            ;; This constructs the eldev executable from templates and
+            ;; installs it in the specified directory.
+            (lambda _
+              (let ((bin (string-append #$output "/bin"))
+                    (site-lisp (elpa-directory #$output)))
+                (mkdir-p bin)
+                (setenv "HOME" (getcwd))
+                (invoke "./install.sh" bin)
+                (substitute* (string-append bin "/eldev")
+                  ;; Point ELDEV_LOCAL to the installation directory so that
+                  ;; eldev doesn't try to bootstrap itself from MELPA when
+                  ;; invoked.
+                  (("export ELDEV_EMACS.*" all)
+                   (string-append "export ELDEV_LOCAL=" site-lisp "\n" all)))))))))
+    (native-inputs
+     (list texinfo))                    ;for tests
+    (home-page "https://github.com/emacs-eldev/eldev/")
+    (synopsis "Emacs-based build tool for Elisp")
+    (description "Eldev (Elisp Development Tool) is an Emacs-based build tool,
+targeted solely at Elisp projects.  It is an alternative to Cask.  Unlike
+Cask, Eldev itself is fully written in Elisp and its configuration files are
+also Elisp programs.  For those familiar with the Java world, Cask can be seen
+as a parallel to Maven — it uses project description, while Eldev is sort of a
+parallel to Gradle — its configuration is a program on its own.")
+    (license license:gpl3+)))
+
+(define-public emacs-el-mock
+  (let ((commit "6cfbc9de8f1927295dca6864907fe4156bd71910")
+        (revision "1"))
+    (package
+      (name "emacs-el-mock")
+      (version (git-version "1.25.1" revision commit))
+      (source
+       (origin
+         (method git-fetch)
+         (uri (git-reference
+               (url "https://github.com/rejeep/el-mock.el")
+               (commit commit)))
+         (file-name (git-file-name name version))
+         (sha256
+          (base32 "09c3a1771v6kliwj0bn953pxxyjlk6q9kp31cxcr0nraik7d0mhk"))))
+      (build-system emacs-build-system)
+      (native-inputs (list emacs-ert-runner
+                           emacs-ert-expectations
+                           emacs-undercover))
+      (home-page "https://github.com/rejeep/el-mock.el")
+      (synopsis "Tiny mock and stub framework in Emacs Lisp")
+      (description
+       "Emacs Lisp Mock is a library for mocking and stubbing using readable
+syntax.  Most commonly Emacs Lisp Mock is used in conjunction with Emacs Lisp
+Expectations, but it can be used in other contexts.")
+      (license license:gpl3+))))
+
+(define-public emacs-ert-async
+  (package
+    (name "emacs-ert-async")
+    (version "0.1.2")
+    (source
+     (origin
+       (method git-fetch)
+       (uri (git-reference
+             (url "https://github.com/rejeep/ert-async.el")
+             (commit (string-append "v" version))))
+       (file-name (git-file-name name version))
+       (sha256
+        (base32
+         "0hn9i405nfhjd1h9vnwj43nxbbz00khrwkjq0acfyxjaz1shfac9"))))
+    (build-system emacs-build-system)
+    (home-page "https://github.com/rejeep/ert-async.el")
+    (synopsis "Async support for ERT")
+    (description "This package allows ERT to work with asynchronous tests.")
+    (license license:gpl3+)))
+
+(define-public emacs-ert-expectations
+  (package
+    (name "emacs-ert-expectations")
+    (version "0.2")
+    (source
+     (origin
+       (method url-fetch)
+       (uri "https://www.emacswiki.org/emacs/download/ert-expectations.el")
+       (sha256
+        (base32
+         "0cwy3ilsid90abzzjb7ha2blq9kmv3gfp3icwwfcz6qczgirq6g7"))))
+    (build-system emacs-build-system)
+    (home-page "https://www.emacswiki.org/emacs/ert-expectations.el")
+    (synopsis "Simple unit test framework for Emacs Lisp")
+    (description "@code{emacs-ert-expectations} is a simple unit test
+framework for Emacs Lisp to be used with @code{ert}.")
+    (license license:gpl3+)))
+
+(define-public emacs-ert-runner
+  (package
+    (name "emacs-ert-runner")
+    (version "0.8.0")
+    (source
+     (origin
+       (method git-fetch)
+       (uri (git-reference
+             (url "https://github.com/rejeep/ert-runner.el")
+             (commit (string-append "v" version))))
+       (file-name (git-file-name name version))
+       (sha256
+        (base32
+         "08gygn9fjank5gpi4v6ynrkn0jbknxbwsn7md4p9ndygdbmnkf98"))))
+    (build-system emacs-build-system)
+    (inputs
+     (list bash-minimal
+           emacs-ansi
+           emacs-commander
+           emacs-dash
+           emacs-f
+           emacs-s
+           emacs-shut-up))
+    ;; Tests for ert-runner have a circular dependency with ecukes, and therefore
+    ;; cannot be run
+    (arguments
+     `(#:tests? #f
+       #:phases
+       (modify-phases %standard-phases
+         (add-after 'install 'install-executable
+           (lambda* (#:key inputs outputs #:allow-other-keys)
+             (let ((out (assoc-ref outputs "out"))
+                   (source-directory (string-append
+                                      (getenv "TMPDIR") "/source")))
+               (substitute* "bin/ert-runner"
+                 (("ERT_RUNNER=\"\\$\\(dirname \\$\\(dirname \\$0\\)\\)")
+                  (string-append "ERT_RUNNER=\"" (elpa-directory out))))
+               (install-file "bin/ert-runner" (string-append out "/bin"))
+               (wrap-program (string-append out "/bin/ert-runner")
+                 (list "EMACSLOADPATH" ":" 'prefix
+                       ;; Do not capture the transient source directory in
+                       ;; the wrapper.
+                       (delete source-directory
+                               (string-split (getenv "EMACSLOADPATH")
+                                             #\:))))))))
+       #:include (cons* "^reporters/.*\\.el$" %default-include)))
+    (home-page "https://github.com/rejeep/ert-runner.el")
+    (synopsis "Opinionated Ert testing workflow")
+    (description "@code{ert-runner} is a tool for Emacs projects tested
+using ERT.  It assumes a certain test structure setup and can therefore make
+running tests easier.")
+    (license license:gpl3+)))
+(define-public emacs-f
+  (package
+    (name "emacs-f")
+    (version "0.21.0")
+    (source (origin
+              (method git-fetch)
+              (uri (git-reference
+                    (url "https://github.com/rejeep/f.el")
+                    (commit (string-append "v" version))))
+              (file-name (git-file-name name version))
+              (sha256
+               (base32
+                "0ccrcfhqfbv9qff38sfym69mai7k7z89yndi6nip8wi5hpd2addc"))))
+    (build-system emacs-build-system)
+    (arguments (list #:tests? #f))      ; circular dependency on ert-runner
+    (propagated-inputs
+     (list emacs-s emacs-dash))
+    (home-page "https://github.com/rejeep/f.el")
+    (synopsis "Emacs API for working with files and directories")
+    (description "This package provides an Emacs library for working with
+files and directories.")
+    (license license:gpl3+)))
+
+(define-public emacs-package-lint
+  (package
+    (name "emacs-package-lint")
+    (version "0.24")
+    (source
+     (origin
+       (method git-fetch)
+       (uri (git-reference
+             (url "https://github.com/purcell/package-lint")
+             (commit version)))
+       (file-name (git-file-name name version))
+       (sha256
+        (base32
+         "0qbzhpmwsgrp6z541jc1cy7jqr7ipdindwfji210279v2w6yrj1p"))))
+    (arguments
+     (list #:include #~(cons "^data/" %default-include)
+           #:tests? #f                  ; XXX: 8/92 tests failing
+           #:test-command #~(list "make" "test" "INIT_PACKAGES=t")))
+    (build-system emacs-build-system)
+    (propagated-inputs (list emacs-compat))
+    (home-page "https://github.com/purcell/package-lint")
+    (synopsis "Linting library for Elisp package authors")
+    (description
+     "This provides a list of issues with the Emacs package metadata of a file,
+e.g., the package dependencies it requires.  Checks will currently be enabled
+only if a @samp{Package-Requires:} or @samp{Package-Version:} header is
+present in the file.")
+    (license license:gpl3+)))
+
+(define-public emacs-s
+  (package
+    (name "emacs-s")
+    (version "1.13.0")
+    (source
+     (origin
+       (method git-fetch)
+       (uri (git-reference
+             (url "https://github.com/magnars/s.el")
+             (commit version)))
+       (file-name (git-file-name name version))
+       (sha256
+        (base32 "010i92kagqbfis46n1ffa28fgkdkjp55n13b6f4izar5r7ixm6wx"))))
+    (build-system emacs-build-system)
+    (arguments
+     `(#:test-command '("./run-tests.sh")))
+    (home-page "https://github.com/magnars/s.el")
+    (synopsis "Emacs string manipulation library")
+    (description "This package provides an Emacs library for manipulating
+strings.")
+    (license license:gpl3+)))
+
+(define-public emacs-shut-up
+  (package
+    (name "emacs-shut-up")
+    (version "0.3.3")
+    (source
+     (origin
+       (method git-fetch)
+       (uri (git-reference
+             (url "https://github.com/cask/shut-up")
+             (commit (string-append "v" version))))
+       (file-name (git-file-name name version))
+       (sha256
+        (base32 "1bnmrwrhra6cpc3jjgwwzrydj5ps7q2dlkh2ag4j7rkyv4dlk351"))))
+    (build-system emacs-build-system)
+    (arguments (list #:tests? #f))      ; circular dependency on ert-runner
+    (home-page "https://github.com/cask/shut-up")
+    (synopsis "Silence Emacs")
+    (description "This package silences most output of Emacs when running an
+Emacs shell script.")
+    (license license:expat)))
+
+(define-public emacs-undercover
+  (package
+    (name "emacs-undercover")
+    (version "0.8.1")
+    (source
+     (origin
+       (method git-fetch)
+       (uri (git-reference
+             (url "https://github.com/sviridov/undercover.el")
+             (commit (string-append "v" version))))
+       (file-name (git-file-name name version))
+       (sha256
+        (base32 "0qmvyy3xg5qi7ws8zcs934d6afsappr1a6pgfp796xpa9vdr4y6j"))))
+    (build-system emacs-build-system)
+    (propagated-inputs
+     (list emacs-dash emacs-shut-up))
+    (home-page "https://github.com/sviridov/undercover.el")
+    (synopsis "Test coverage library for Emacs Lisp")
+    (description
+     "Undercover is a test coverage library for software written in Emacs
+Lisp.")
+    (license license:expat)))
diff --git a/gnu/packages/emacs-xyz.scm b/gnu/packages/emacs-xyz.scm
index 0fc1bf90d3..670c298614 100644
--- a/gnu/packages/emacs-xyz.scm
+++ b/gnu/packages/emacs-xyz.scm
@@ -203,6 +203,7 @@ (define-module (gnu packages emacs-xyz)
   #:use-module (gnu packages djvu)
   #:use-module (gnu packages ebook)
   #:use-module (gnu packages emacs)
+  #:use-module (gnu packages emacs-build)
   #:use-module (gnu packages enchant)
   #:use-module (gnu packages fonts)
   #:use-module (gnu packages freedesktop)
@@ -6549,33 +6550,6 @@ (define-public emacs-pdfgrep
 next matching page.")
       (license license:gpl3+))))
 
-(define-public emacs-dash
-  (package
-    (name "emacs-dash")
-    (version "2.19.1")
-    (source (origin
-              (method git-fetch)
-              (uri (git-reference
-                    (url "https://github.com/magnars/dash.el")
-                    (commit version)))
-              (file-name (git-file-name name version))
-              (sha256
-               (base32
-                "0z6f8y1m9amhg427iz1d4xcyr6n0kj5w7kmiz134p320ixsdnzd8"))))
-    (build-system emacs-build-system)
-    (arguments
-     (list #:phases
-           #~(modify-phases %standard-phases
-               (add-after 'unpack 'disable-byte-compile-error-on-warn
-                 (lambda _
-                   (substitute* "Makefile"
-                     (("\\(setq byte-compile-error-on-warn t\\)")
-                      "(setq byte-compile-error-on-warn nil)")))))))
-    (home-page "https://github.com/magnars/dash.el")
-    (synopsis "Modern list library for Emacs")
-    (description "This package provides a modern list API library for Emacs.")
-    (license license:gpl3+)))
-
 (define-public emacs-bui
   (package
     (name "emacs-bui")
@@ -7041,28 +7015,6 @@ (define-public emacs-undo-fu-session
 which is restored where possible when the file is loaded again.")
       (license license:gpl3+))))
 
-(define-public emacs-s
-  (package
-    (name "emacs-s")
-    (version "1.13.0")
-    (source
-     (origin
-       (method git-fetch)
-       (uri (git-reference
-             (url "https://github.com/magnars/s.el")
-             (commit version)))
-       (file-name (git-file-name name version))
-       (sha256
-        (base32 "010i92kagqbfis46n1ffa28fgkdkjp55n13b6f4izar5r7ixm6wx"))))
-    (build-system emacs-build-system)
-    (arguments
-     `(#:test-command '("./run-tests.sh")))
-    (home-page "https://github.com/magnars/s.el")
-    (synopsis "Emacs string manipulation library")
-    (description "This package provides an Emacs library for manipulating
-strings.")
-    (license license:gpl3+)))
-
 (define-public emacs-inflections
   (package
     (name "emacs-inflections")
@@ -7296,29 +7248,6 @@ (define-public emacs-twittering-mode
 Emacs.")
     (license license:gpl2+)))
 
-(define-public emacs-f
-  (package
-    (name "emacs-f")
-    (version "0.21.0")
-    (source (origin
-              (method git-fetch)
-              (uri (git-reference
-                    (url "https://github.com/rejeep/f.el")
-                    (commit (string-append "v" version))))
-              (file-name (git-file-name name version))
-              (sha256
-               (base32
-                "0ccrcfhqfbv9qff38sfym69mai7k7z89yndi6nip8wi5hpd2addc"))))
-    (build-system emacs-build-system)
-    (arguments (list #:tests? #f))      ; circular dependency on ert-runner
-    (propagated-inputs
-     (list emacs-s emacs-dash))
-    (home-page "https://github.com/rejeep/f.el")
-    (synopsis "Emacs API for working with files and directories")
-    (description "This package provides an Emacs library for working with
-files and directories.")
-    (license license:gpl3+)))
-
 (define-public emacs-fountain-mode
   (package
     (name "emacs-fountain-mode")
@@ -7592,33 +7521,6 @@ (define-public emacs-gdscript-mode
 and code formatting.")
     (license license:gpl3+)))
 
-(define-public emacs-el-mock
-  (let ((commit "6cfbc9de8f1927295dca6864907fe4156bd71910")
-        (revision "1"))
-    (package
-      (name "emacs-el-mock")
-      (version (git-version "1.25.1" revision commit))
-      (source
-       (origin
-         (method git-fetch)
-         (uri (git-reference
-               (url "https://github.com/rejeep/el-mock.el")
-               (commit commit)))
-         (file-name (git-file-name name version))
-         (sha256
-          (base32 "09c3a1771v6kliwj0bn953pxxyjlk6q9kp31cxcr0nraik7d0mhk"))))
-      (build-system emacs-build-system)
-      (native-inputs (list emacs-ert-runner
-                           emacs-ert-expectations
-                           emacs-undercover))
-      (home-page "https://github.com/rejeep/el-mock.el")
-      (synopsis "Tiny mock and stub framework in Emacs Lisp")
-      (description
-       "Emacs Lisp Mock is a library for mocking and stubbing using readable
-syntax.  Most commonly Emacs Lisp Mock is used in conjunction with Emacs Lisp
-Expectations, but it can be used in other contexts.")
-      (license license:gpl3+))))
-
 (define-public emacs-ecukes
   (package
     (name "emacs-ecukes")
@@ -8246,50 +8148,6 @@ (define-public emacs-erc-status-sidebar
 @code{erc-track} does in the mode line, but in an alternative format.")
       (license license:gpl3+))))
 
-(define-public emacs-shut-up
-  (package
-    (name "emacs-shut-up")
-    (version "0.3.3")
-    (source
-     (origin
-       (method git-fetch)
-       (uri (git-reference
-             (url "https://github.com/cask/shut-up")
-             (commit (string-append "v" version))))
-       (file-name (git-file-name name version))
-       (sha256
-        (base32 "1bnmrwrhra6cpc3jjgwwzrydj5ps7q2dlkh2ag4j7rkyv4dlk351"))))
-    (build-system emacs-build-system)
-    (arguments (list #:tests? #f))      ; circular dependency on ert-runner
-    (home-page "https://github.com/cask/shut-up")
-    (synopsis "Silence Emacs")
-    (description "This package silences most output of Emacs when running an
-Emacs shell script.")
-    (license license:expat)))
-
-(define-public emacs-undercover
-  (package
-    (name "emacs-undercover")
-    (version "0.8.1")
-    (source
-     (origin
-       (method git-fetch)
-       (uri (git-reference
-             (url "https://github.com/sviridov/undercover.el")
-             (commit (string-append "v" version))))
-       (file-name (git-file-name name version))
-       (sha256
-        (base32 "0qmvyy3xg5qi7ws8zcs934d6afsappr1a6pgfp796xpa9vdr4y6j"))))
-    (build-system emacs-build-system)
-    (propagated-inputs
-     (list emacs-dash emacs-shut-up))
-    (home-page "https://github.com/sviridov/undercover.el")
-    (synopsis "Test coverage library for Emacs Lisp")
-    (description
-     "Undercover is a test coverage library for software written in Emacs
-Lisp.")
-    (license license:expat)))
-
 (define-public emacs-paren-face
   (package
     (name "emacs-paren-face")
@@ -10319,24 +10177,6 @@ (define-public emacs-piem
 parts for convenience.")
     (license license:gpl3+)))
 
-(define-public emacs-ert-expectations
-  (package
-    (name "emacs-ert-expectations")
-    (version "0.2")
-    (source
-     (origin
-       (method url-fetch)
-       (uri "https://www.emacswiki.org/emacs/download/ert-expectations.el")
-       (sha256
-        (base32
-         "0cwy3ilsid90abzzjb7ha2blq9kmv3gfp3icwwfcz6qczgirq6g7"))))
-    (build-system emacs-build-system)
-    (home-page "https://www.emacswiki.org/emacs/ert-expectations.el")
-    (synopsis "Simple unit test framework for Emacs Lisp")
-    (description "@code{emacs-ert-expectations} is a simple unit test
-framework for Emacs Lisp to be used with @code{ert}.")
-    (license license:gpl3+)))
-
 (define-public emacs-deferred
   (package
     (name "emacs-deferred")
@@ -10530,36 +10370,6 @@ (define-public emacs-combobulate
 correct movement and editing than you would otherwise have.")
       (license license:gpl3+))))
 
-(define-public emacs-compat
-  (package
-    (name "emacs-compat")
-    (version "30.0.2.0")
-    (source (origin
-              (method git-fetch)
-              (uri (git-reference
-                    (url "https://github.com/emacs-compat/compat")
-                    (commit version)))
-              (file-name (git-file-name name version))
-              (sha256
-               (base32
-                "020rn3l2sn0vzfhx30k47jd2cgvsddk0zfbizgb68hbajcxqfsl4"))))
-    (build-system emacs-build-system)
-    (home-page "https://elpa.gnu.org/packages/compat.html")
-    (synopsis "Emacs Lisp compatibility library")
-    (description
-     "To allow for the usage of Emacs functions and macros that are defined
-in newer versions of Emacs, @code{compat.el} provides definitions that
-are installed ONLY if necessary.  These reimplementations of functions
-and macros are at least subsets of the actual implementations.  Be
-sure to read the documentation string to make sure.
-
-Not every function provided in newer versions of Emacs is provided
-here.  Some depend on new features from the core, others cannot be
-implemented to a meaningful degree.  The main audience for this
-library are not regular users, but package maintainers.  Therefore
-commands and user options are usually not implemented here.")
-    (license license:gpl3+)))
-
 (define-public emacs-company
   (package
     (name "emacs-company")
@@ -21921,58 +21731,6 @@ (define-public emacs-evil-commentary
 lines, and @code{gc} to comment out the target of a motion.")
     (license license:gpl3+)))
 
-(define-public emacs-ansi
-  (let ((commit "2367fba7b3b2340364a30cd6de7f3eb6bb9898a3")
-        (revision "2"))
-    (package
-      (name "emacs-ansi")
-      (version (git-version "0.4.1" revision commit))
-      (source
-       (origin
-         (method git-fetch)
-         (uri (git-reference
-               (url "https://github.com/rejeep/ansi.el")
-               (commit commit)))
-         (file-name (git-file-name name version))
-         (sha256
-          (base32 "1n7h6l4icm6lks3zpvd83j1fzrnspw19rmz7c96vy7pdh1y4v3p3"))))
-      (build-system emacs-build-system)
-      ;; Tests for emacs-ansi have a circular dependency with ert-runner, and
-      ;; therefore cannot be run
-      (arguments (list #:tests? #f))
-      (home-page "https://github.com/rejeep/ansi.el")
-      (synopsis "Convert strings to ANSI")
-      (description "@code{emacs-ansi} defines functions that turns simple
-strings to ANSI strings.  Turning a string into an ANSI string can be to add
-color to a text, add color in the background of a text or adding a style, such
-as bold, underscore or italic.")
-      (license license:gpl3+))))
-
-(define-public emacs-commander
-  (package
-    (name "emacs-commander")
-    (version "0.7.0")
-    (source
-     (origin
-       (method git-fetch)
-       (uri (git-reference
-             (url "https://github.com/rejeep/commander.el")
-             (commit (string-append "v" version))))
-       (file-name (git-file-name name version))
-       (sha256
-        (base32 "1j6hhyzww7wfwk6bllbb5mk4hw4qs8hsgfbfdifsam9c6i4spm45"))))
-    (build-system emacs-build-system)
-    ;; Tests for emacs-commander have a circular dependency with ert-runner, and
-    ;; therefore cannot be run
-    (arguments (list #:tests? #f))
-    (propagated-inputs
-     (list emacs-dash emacs-f emacs-s))
-    (home-page "https://github.com/rejeep/commander.el")
-    (synopsis "Emacs command line parser")
-    (description "@code{emacs-commander} provides command line parsing for
-Emacs.")
-    (license license:gpl3+)))
-
 (define-public emacs-eglot
   (package
     (name "emacs-eglot")
@@ -22159,59 +21917,6 @@ (define-public emacs-eldoc-box
 hidden.")
     (license license:gpl3+)))
 
-(define-public emacs-ert-runner
-  (package
-    (name "emacs-ert-runner")
-    (version "0.8.0")
-    (source
-     (origin
-       (method git-fetch)
-       (uri (git-reference
-             (url "https://github.com/rejeep/ert-runner.el")
-             (commit (string-append "v" version))))
-       (file-name (git-file-name name version))
-       (sha256
-        (base32
-         "08gygn9fjank5gpi4v6ynrkn0jbknxbwsn7md4p9ndygdbmnkf98"))))
-    (build-system emacs-build-system)
-    (inputs
-     (list bash-minimal
-           emacs-ansi
-           emacs-commander
-           emacs-dash
-           emacs-f
-           emacs-s
-           emacs-shut-up))
-    ;; Tests for ert-runner have a circular dependency with ecukes, and therefore
-    ;; cannot be run
-    (arguments
-     `(#:tests? #f
-       #:phases
-       (modify-phases %standard-phases
-         (add-after 'install 'install-executable
-           (lambda* (#:key inputs outputs #:allow-other-keys)
-             (let ((out (assoc-ref outputs "out"))
-                   (source-directory (string-append
-                                      (getenv "TMPDIR") "/source")))
-               (substitute* "bin/ert-runner"
-                 (("ERT_RUNNER=\"\\$\\(dirname \\$\\(dirname \\$0\\)\\)")
-                  (string-append "ERT_RUNNER=\"" (elpa-directory out))))
-               (install-file "bin/ert-runner" (string-append out "/bin"))
-               (wrap-program (string-append out "/bin/ert-runner")
-                 (list "EMACSLOADPATH" ":" 'prefix
-                       ;; Do not capture the transient source directory in
-                       ;; the wrapper.
-                       (delete source-directory
-                               (string-split (getenv "EMACSLOADPATH")
-                                             #\:))))))))
-       #:include (cons* "^reporters/.*\\.el$" %default-include)))
-    (home-page "https://github.com/rejeep/ert-runner.el")
-    (synopsis "Opinionated Ert testing workflow")
-    (description "@code{ert-runner} is a tool for Emacs projects tested
-using ERT.  It assumes a certain test structure setup and can therefore make
-running tests easier.")
-    (license license:gpl3+)))
-
 (define-public emacs-xtest
   (package
     (name "emacs-xtest")
@@ -25793,60 +25498,6 @@ (define-public emacs-peg
 according to a parsing expression grammar.")
     (license license:gpl3+)))
 
-(define-public emacs-eldev
-  (package
-    (name "emacs-eldev")
-    (version "1.11")
-    (source
-     (origin
-       (method git-fetch)
-       (uri (git-reference
-             (url "https://github.com/emacs-eldev/eldev")
-             (commit version)))
-       (file-name (git-file-name name version))
-       (sha256
-        (base32 "144wf5im2fy1fv8jjik1s9zfyicphh2pi4dp6q4airrkiirmmr3m"))))
-    (build-system emacs-build-system)
-    (arguments
-     (list
-      #:test-command #~(list "./bin/eldev" "-p" "-dtTC" "test")
-      #:phases
-      #~(modify-phases %standard-phases
-          (add-after 'unpack 'prepare-for-tests
-            (lambda _
-              (setenv "ELDEV_LOCAL" (getcwd))
-              (make-file-writable "test/project-i/project-i-autoloads.el")))
-          (add-after 'unpack 'skip-failing-tests
-            ;; FIXME: 2 tests are failing.  Skip them for now.
-            (lambda _
-              (delete-file "test/upgrade-self.el")))
-          (add-after 'install 'install-eldev-executable
-            ;; This constructs the eldev executable from templates and
-            ;; installs it in the specified directory.
-            (lambda _
-              (let ((bin (string-append #$output "/bin"))
-                    (site-lisp (elpa-directory #$output)))
-                (mkdir-p bin)
-                (setenv "HOME" (getcwd))
-                (invoke "./install.sh" bin)
-                (substitute* (string-append bin "/eldev")
-                  ;; Point ELDEV_LOCAL to the installation directory so that
-                  ;; eldev doesn't try to bootstrap itself from MELPA when
-                  ;; invoked.
-                  (("export ELDEV_EMACS.*" all)
-                   (string-append "export ELDEV_LOCAL=" site-lisp "\n" all)))))))))
-    (native-inputs
-     (list texinfo))                    ;for tests
-    (home-page "https://github.com/emacs-eldev/eldev/")
-    (synopsis "Emacs-based build tool for Elisp")
-    (description "Eldev (Elisp Development Tool) is an Emacs-based build tool,
-targeted solely at Elisp projects.  It is an alternative to Cask.  Unlike
-Cask, Eldev itself is fully written in Elisp and its configuration files are
-also Elisp programs.  For those familiar with the Java world, Cask can be seen
-as a parallel to Maven — it uses project description, while Eldev is sort of a
-parallel to Gradle — its configuration is a program on its own.")
-    (license license:gpl3+)))
-
 (define-public emacs-with-simulated-input
   (package
     (name "emacs-with-simulated-input")
@@ -30024,35 +29675,6 @@ (define-public emacs-image+
 image, rotate it, save modified images, and more.")
       (license license:gpl3+))))
 
-(define-public emacs-package-lint
-  (package
-    (name "emacs-package-lint")
-    (version "0.24")
-    (source
-     (origin
-       (method git-fetch)
-       (uri (git-reference
-             (url "https://github.com/purcell/package-lint")
-             (commit version)))
-       (file-name (git-file-name name version))
-       (sha256
-        (base32
-         "0qbzhpmwsgrp6z541jc1cy7jqr7ipdindwfji210279v2w6yrj1p"))))
-    (arguments
-     (list #:include #~(cons "^data/" %default-include)
-           #:tests? #f                  ; XXX: 8/92 tests failing
-           #:test-command #~(list "make" "test" "INIT_PACKAGES=t")))
-    (build-system emacs-build-system)
-    (propagated-inputs (list emacs-compat))
-    (home-page "https://github.com/purcell/package-lint")
-    (synopsis "Linting library for Elisp package authors")
-    (description
-     "This provides a list of issues with the Emacs package metadata of a file,
-e.g., the package dependencies it requires.  Checks will currently be enabled
-only if a @samp{Package-Requires:} or @samp{Package-Version:} header is
-present in the file.")
-    (license license:gpl3+)))
-
 (define-public emacs-packed
   (package
     (name "emacs-packed")
@@ -32030,38 +31652,6 @@ (define-public emacs-sesman
 targets the Emacs based IDEs (CIDER, ESS, Geiser, Robe, SLIME etc.)")
     (license license:gpl3+)))
 
-(define-public emacs-buttercup
-  (package
-    (name "emacs-buttercup")
-    (version "1.37")
-    (source
-     (origin
-       (method git-fetch)
-       (uri (git-reference
-             (url "https://github.com/jorgenschaefer/emacs-buttercup")
-             (commit (string-append "v" version))))
-       (file-name (git-file-name name version))
-       (sha256
-        (base32
-         "0gkw1lmy8ynralrs4xwqsd06ww09xk5yqjdgw4r5c0zhp5dxn4ky"))))
-    (build-system emacs-build-system)
-    (arguments
-     (list
-      #:test-command #~(list "make" "test")
-      #:phases
-      #~(modify-phases %standard-phases
-          (add-after 'install 'install-bin
-            (lambda _
-              (install-file "bin/buttercup"
-                            (string-append #$output "/bin")))))))
-    (home-page "https://github.com/jorgenschaefer/emacs-buttercup")
-    (synopsis "Behavior driven emacs lisp testing framework")
-    (description "Buttercup is a behavior-driven development framework for
-testing Emacs Lisp code.  It groups related tests so they can share
-common set-up and tear-down code, and allows the programmer to \"spy\" on
-functions to ensure they are called with the right arguments during testing.")
-    (license license:gpl3+)))
-
 (define-public emacs-cort
   (package
     (name "emacs-cort")
@@ -34800,26 +34390,6 @@ (define-public emacs-exwm-ss
 screensaver activation in EXWM.")
       (license (list license:gpl3+)))))
 
-(define-public emacs-ert-async
-  (package
-    (name "emacs-ert-async")
-    (version "0.1.2")
-    (source
-     (origin
-       (method git-fetch)
-       (uri (git-reference
-             (url "https://github.com/rejeep/ert-async.el")
-             (commit (string-append "v" version))))
-       (file-name (git-file-name name version))
-       (sha256
-        (base32
-         "0hn9i405nfhjd1h9vnwj43nxbbz00khrwkjq0acfyxjaz1shfac9"))))
-    (build-system emacs-build-system)
-    (home-page "https://github.com/rejeep/ert-async.el")
-    (synopsis "Async support for ERT")
-    (description "This package allows ERT to work with asynchronous tests.")
-    (license license:gpl3+)))
-
 (define-public emacs-prodigy
   (package
     (name "emacs-prodigy")
diff --git a/gnu/packages/guile-xyz.scm b/gnu/packages/guile-xyz.scm
index 30c8e84799..4cb5c3d48d 100644
--- a/gnu/packages/guile-xyz.scm
+++ b/gnu/packages/guile-xyz.scm
@@ -86,6 +86,7 @@ (define-module (gnu packages guile-xyz)
   #:use-module (gnu packages databases)
   #:use-module (gnu packages disk)
   #:use-module (gnu packages emacs)
+  #:use-module (gnu packages emacs-build)
   #:use-module (gnu packages emacs-xyz)
   #:use-module (gnu packages gawk)
   #:use-module (gnu packages gcc)
-- 
2.48.1