[bug#50333] [PATCH] Fixed missing files in org-roam 2.1.0

[Adolfo De Unánue]

>From d601aa318aa03255d23b82cd94a5080889636a47 Mon Sep 17 00:00:00 2001
From: =?UTF-8?q?Adolfo=20De=20Un=C3=A1nue?= <adolfo+git@unanue.mx>
Date: Thu, 2 Sep 2021 00:53:32 -0500
Subject: [PATCH] fixed missing files in org-roam

---
 gnu/packages/emacs-xyz.scm | 36 +++++++++++++++++++++++-------------
 1 file changed, 23 insertions(+), 13 deletions(-)

diff --git a/gnu/packages/emacs-xyz.scm b/gnu/packages/emacs-xyz.scm
index c106e81fa5..e712892e34 100644
--- a/gnu/packages/emacs-xyz.scm
+++ b/gnu/packages/emacs-xyz.scm
@@ -102,6 +102,7 @@
 ;;; Copyright © 2021 Dhruvin Gandhi <contact@dhruvin.dev>
 ;;; Copyright © 2021 Matthew James Kraai <kraai@ftbfs.org>
 ;;; Copyright © 2021 Noisytoot <noisytoot@disroot.org>
+;;; Copyright © 2021 Nanounanue <adolfo@unanue.mx>
 ;;;
 ;;; This file is part of GNU Guix.
 ;;;
@@ -28239,6 +28240,15 @@ snippets for Emacs.")
              (let ((out (assoc-ref outputs "out")))
                (install-file "doc/images/org-ref-citelink.png"
                              (string-append out "/share/info/images")))))
+         (add-after 'install 'install-extensions
+           (lambda* (#:key outputs #:allow-other-keys)
+             (copy-recursively
+              "extensions"
+              (string-append (assoc-ref outputs "out")
+                             (string-append
+                              "/share/emacs/site-lisp/org-roam-"
+                              ,version)))
+             #t))
          (add-after 'install-image 'make-info
            (lambda* (#:key outputs #:allow-other-keys)
              (let ((out (assoc-ref outputs "out")))
@@ -28246,23 +28256,23 @@ snippets for Emacs.")
                  (invoke "makeinfo" "-o" "org-roam.info" "org-roam.texi")
                  (install-file "org-roam.info"
                                (string-append out "/share/info")))))))))
-       (native-inputs
-        `(("texinfo" ,texinfo)))
-       (propagated-inputs
-        `(("emacs-dash" ,emacs-dash)
-          ("emacs-emacsql-sqlite3" ,emacs-emacsql-sqlite3)
-          ("emacs-f" ,emacs-f)
-          ("emacs-magit" ,emacs-magit)
-          ("emacs-org" ,emacs-org)
-          ("emacs-s" ,emacs-s)))
-       (home-page "https://github.com/org-roam/org-roam/";)
-       (synopsis "Non-hierarchical note-taking with Org mode")
-       (description "Emacs Org Roam is a solution for taking non-hierarchical
+    (native-inputs
+     `(("texinfo" ,texinfo)))
+    (propagated-inputs
+     `(("emacs-dash" ,emacs-dash)
+       ("emacs-emacsql-sqlite3" ,emacs-emacsql-sqlite3)
+       ("emacs-f" ,emacs-f)
+       ("emacs-magit" ,emacs-magit)
+       ("emacs-org" ,emacs-org)
+       ("emacs-s" ,emacs-s)))
+    (home-page "https://github.com/org-roam/org-roam/";)
+    (synopsis "Non-hierarchical note-taking with Org mode")
+    (description "Emacs Org Roam is a solution for taking non-hierarchical
 notes with Org mode.  Notes are captured without hierarchy and are connected
 by tags.  Notes can be found and created quickly.  Org Roam should also work
 as a plug-and-play solution for anyone already using Org mode for their
 personal wiki.")
-       (license license:gpl3+)))
+    (license license:gpl3+)))
 
 (define-public emacs-org-roam-bibtex
   (package
-- 
2.33.0


--
- A