11/15: gnu: emacs-geiser-racket: Process autoloads in-tree.

[guix-commits]

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

commit 32446edab0b65a957e2e51acf88fa7e95c203e5a
Author: Liliana Marie Prikler <liliana.prikler@gmail.com>
AuthorDate: Thu Oct 19 07:20:50 2023 +0200

    gnu: emacs-geiser-racket: Process autoloads in-tree.
    
    * gnu/packages/emacs-xyz.scm 
(emacs-geiser-racket)[#:phases]<patch-autoloads>:
    Resolve "geiser-racket-autoloads.el" in the current working directory.
---
 gnu/packages/emacs-xyz.scm | 3 +--
 1 file changed, 1 insertion(+), 2 deletions(-)

diff --git a/gnu/packages/emacs-xyz.scm b/gnu/packages/emacs-xyz.scm
index a1bb6e6666..26cdcb63a9 100644
--- a/gnu/packages/emacs-xyz.scm
+++ b/gnu/packages/emacs-xyz.scm
@@ -657,8 +657,7 @@ a generic Scheme interaction mode for the GNU Emacs 
editor.")
                          (search-input-file inputs "bin/racket"))))))
           (add-after 'make-autoloads 'patch-autoloads
             (lambda _
-              (substitute* (string-append (elpa-directory #$output)
-                                          "/geiser-racket-autoloads.el")
+              (substitute* "geiser-racket-autoloads.el"
                 ;; Activating implementations fails when Geiser is not yet
                 ;; loaded, so let's defer that until it is.
                 (("\\(geiser-activate-implementation .*\\)" all)