branch master updated: gnu: translate-shell: Adjust to changes in emacs-build-system.

[guix-commits]

This is an automated email from the git hooks/post-receive script.

efraim pushed a commit to branch master
in repository guix.

The following commit(s) were added to refs/heads/master by this push:
     new 2e4f619  gnu: translate-shell: Adjust to changes in emacs-build-system.
2e4f619 is described below

commit 2e4f61908b0214290fc58398355316ceb40b625f
Author: Efraim Flashner <efraim@flashner.co.il>
AuthorDate: Thu May 6 14:22:59 2021 +0300

    gnu: translate-shell: Adjust to changes in emacs-build-system.
    
    * gnu/packages/dictionaries.scm (translate-shell)[arguments]: Replace
    custom 'emacs-install phase with the 'install phase from the
    emacs-build-system. Also add 'emacs-make-autoload and
    'emacs-autoloads-completion phases from the emacs-build-system. Adjust
    modules and imported modules accordingly.
---
 gnu/packages/dictionaries.scm | 17 +++++++++--------
 1 file changed, 9 insertions(+), 8 deletions(-)

diff --git a/gnu/packages/dictionaries.scm b/gnu/packages/dictionaries.scm
index c4c3775..30995bf 100644
--- a/gnu/packages/dictionaries.scm
+++ b/gnu/packages/dictionaries.scm
@@ -277,17 +277,18 @@ and a Python library.")
                                                 rlwrap "/bin")))))
              #t))
          (add-after 'install 'emacs-install
-           (lambda* (#:key inputs outputs #:allow-other-keys)
-             (let* ((out   (assoc-ref outputs "out"))
-                    (dest  (string-append out "/share/emacs/site-lisp"))
-                    (emacs (string-append (assoc-ref inputs "emacs") 
"/bin/emacs")))
-               (install-file "google-translate-mode.el" dest)
-               (emacs-generate-autoloads ,name dest)))))
+           (assoc-ref emacs:%standard-phases 'install))
+         (add-after 'emacs-install 'emacs-make-autoloads
+           (assoc-ref emacs:%standard-phases 'make-autoloads))
+         (add-after 'emacs-make-autoloads 'emacs-autoloads-compilation
+           (assoc-ref emacs:%standard-phases 'enable-autoloads-compilation)))
        #:make-flags (list (string-append "PREFIX=" %output)
                           "NETWORK_ACCESS=no test")
-       #:imported-modules (,@%gnu-build-system-modules (guix build 
emacs-utils))
+       #:imported-modules (,@%gnu-build-system-modules
+                            (guix build emacs-build-system)
+                            (guix build emacs-utils))
        #:modules ((guix build gnu-build-system)
-                  (guix build emacs-utils)
+                  ((guix build emacs-build-system) #:prefix emacs:)
                   (guix build utils))
        #:test-target "test"))
     (inputs