02/02: gnu: emacs-rec-mode: Patch executable paths.

[guix-commits]

lilyp pushed a commit to branch master
in repository guix.

commit 6c6cc42f0ac095ecc6d2f20cd399d77d86080b66
Author: ( <paren@disroot.org>
AuthorDate: Sat Nov 26 10:09:05 2022 +0000

    gnu: emacs-rec-mode: Patch executable paths.
    
    * gnu/packages/databases.scm (emacs-rec-mode)[#:phases]: Add
    ‘patch-program-paths’.
    [inputs]: Add recutils.
    
    Signed-off-by: Liliana Marie Prikler <liliana.prikler@gmail.com>
---
 gnu/packages/databases.scm | 7 +++++++
 1 file changed, 7 insertions(+)

diff --git a/gnu/packages/databases.scm b/gnu/packages/databases.scm
index de30145ec5..862d8bfd62 100644
--- a/gnu/packages/databases.scm
+++ b/gnu/packages/databases.scm
@@ -1634,10 +1634,17 @@ types are supported, as is encryption.")
      (list
       #:phases
       #~(modify-phases %standard-phases
+          (add-after 'unpack 'patch-program-paths
+            (lambda* (#:key inputs #:allow-other-keys)
+              (emacs-substitute-variables "rec-mode.el"
+                ("rec-recfix" (search-input-file inputs "bin/recfix"))
+                ("rec-recinf" (search-input-file inputs "bin/recinf"))
+                ("rec-recsel" (search-input-file inputs "bin/recsel")))))
           (add-before 'install 'make-info
             (lambda _
               (invoke "makeinfo" "--no-split"
                       "-o" "rec-mode.info" "rec-mode.texi"))))))
+    (inputs (list recutils))
     (native-inputs (list texinfo))
     (home-page "https://www.gnu.org/software/recutils/";)
     (synopsis "Emacs mode for working with recutils database files")