02/04: gnu: Use copy-build-system for prosody modules.

[guix-commits]

lilyp pushed a commit to branch master
in repository guix.

commit cab71bdcfb3e54e04503a127c456793f1d0fc780
Author: Carlo Zancanaro <carlo@zancanaro.id.au>
AuthorDate: Sat Mar 2 22:35:13 2024 +1100

    gnu: Use copy-build-system for prosody modules.
    
    * gnu/packages/messaging.scm (prosody-module): Use copy-build system.
    
    Change-Id: I6de2827c63cb454d80b20f3af84fa610a75172f4
    Signed-off-by: Liliana Marie Prikler <liliana.prikler@gmail.com>
---
 gnu/packages/messaging.scm | 16 +++++-----------
 1 file changed, 5 insertions(+), 11 deletions(-)

diff --git a/gnu/packages/messaging.scm b/gnu/packages/messaging.scm
index 35e11fb5dc..3dd1e66e81 100644
--- a/gnu/packages/messaging.scm
+++ b/gnu/packages/messaging.scm
@@ -144,6 +144,7 @@
   #:use-module (gnu packages xml)
   #:use-module (gnu packages xorg)
   #:use-module (guix build-system cmake)
+  #:use-module (guix build-system copy)
   #:use-module (guix build-system go)
   #:use-module (guix build-system glib-or-gtk)
   #:use-module (guix build-system gnu)
@@ -1600,18 +1601,11 @@ protocols.")
                 (sha256
                  (base32
                   "142wrcism70nf8ffahhd961cqg2pi1h7ic8adfs3zwh0j3pnf41f"))))
-      (build-system trivial-build-system)
+      (build-system copy-build-system)
       (arguments
-       '(#:modules ((guix build utils))
-         #:builder
-         (begin
-           (use-modules (guix build utils))
-           (let ((out (assoc-ref %outputs "out"))
-                 (source (assoc-ref %build-inputs "source")))
-             (with-directory-excursion (in-vicinity source module-name)
-               (install-file (string-append module-name ".lua") out))
-             #t))))
-      (home-page #f)
+       `(#:install-plan '((,(string-append module-name "/") "."))))
+      (home-page (string-append "https://modules.prosody.im/";
+                                module-name ".html"))
       (synopsis #f)
       (description #f)
       (license (package-license prosody)))))