[bug#74953] Add an info manual building phase to the emacs-denote package definition.

[bug#74953] Add an info manual building phase to the emacs-denote package definition.

[Yuval Langer]

[-- Attachment #1: Type: text/plain, Size: 52 bytes --]

This step builds the info manual from the org file.

[-- Attachment #2: 0001-PATCH-Add-an-info-manual-building-phase-to-the-emacs.patch --]
[-- Type: text/x-patch, Size: 1469 bytes --]

From cacbb9d549a35b6ae3bb36516a68ae49dcd248ad Mon Sep 17 00:00:00 2001
Message-Id: <cacbb9d549a35b6ae3bb36516a68ae49dcd248ad.1734554026.git.yuval.langer@gmail.com>
From: Yuval Langer <yuval.langer@gmail.com>
Date: Wed, 18 Dec 2024 22:30:53 +0200
Subject: [PATCH] [PATCH] Add an info manual building phase to the emacs-denote
 package definition.

---
 gnu/packages/emacs-xyz.scm | 12 ++++++++++++
 1 file changed, 12 insertions(+)

diff --git a/gnu/packages/emacs-xyz.scm b/gnu/packages/emacs-xyz.scm
index c3b98b3726..8dafc6a013 100644
--- a/gnu/packages/emacs-xyz.scm
+++ b/gnu/packages/emacs-xyz.scm
@@ -18705,6 +18705,18 @@ you to deal with multiple log levels.")
        (sha256
         (base32 "0g9ciqgkipm6ag5nvyvaz0wc51hpk0wh2wwiqaybdfhzja8bbqx6"))))
     (build-system emacs-build-system)
+    (arguments
+     (list
+      #:phases #~(modify-phases %standard-phases
+                   (add-after 'unpack 'build-info-manual
+                     (lambda _
+                       (import (guix build utils))
+                       (invoke (string-append #$emacs "/bin/emacs")
+                               "README.org"
+                               "--batch"
+                               "-f"
+                               "org-texinfo-export-to-info"
+                               "--kill") #t)))))
     (native-inputs (list texinfo))
     (home-page "https://protesilaos.com/emacs/denote/")
     (synopsis "Simple notes for Emacs")
-- 
2.30.2