unofficial mirror of guix-patches@gnu.org 
 help / color / mirror / code / Atom feed
* [bug#72560] [PATCH] gnu: ejabberd: Add inputs and wrap-program phase.
@ 2024-08-10 12:45 Igor Goryachev via Guix-patches via
  2024-08-22 10:21 ` [bug#72560] [PATCH v2] " Igor Goryachev via Guix-patches via
  0 siblings, 1 reply; 3+ messages in thread
From: Igor Goryachev via Guix-patches via @ 2024-08-10 12:45 UTC (permalink / raw)
  To: 72560; +Cc: Igor Goryachev, Andrew Tropin

* gnu/packages/messaging.scm (ejabberd): Add inputs and wrap-program phase.

Change-Id: Id8177c54437dca9b98bbd6a237b9a713bc904c84
---
 gnu/packages/messaging.scm | 14 +++++++++++++-
 1 file changed, 13 insertions(+), 1 deletion(-)

diff --git a/gnu/packages/messaging.scm b/gnu/packages/messaging.scm
index da04c34636..efcd0167f1 100644
--- a/gnu/packages/messaging.scm
+++ b/gnu/packages/messaging.scm
@@ -3645,6 +3645,7 @@ (define-public ejabberd
        (sha256
         (base32 "0d5i9skgfjzs2100k0g99sigc2w61480ysz3va6pmb4nx43100g3"))))
     (build-system rebar-build-system)
+    (inputs (list coreutils procps sed))
     (native-inputs
      (list autoconf
            automake
@@ -3757,7 +3758,18 @@ (define-public ejabberd
                                 (string-append erts "/bin")))
                 (chmod (string-append ejabberd
                                       "/bin/install_upgrade.escript") #o755)
-                (copy-recursively ejabberd #$output)))))))
+                (copy-recursively ejabberd #$output))))
+          (add-after 'install 'wrap-program
+            (lambda* (#:key inputs outputs #:allow-other-keys)
+              (let ((out (assoc-ref outputs "out")))
+                (wrap-program (string-append out "/bin/ejabberdctl")
+                  `("PATH" ":" suffix
+                    ,(map (lambda (command)
+                            (dirname
+                             (search-input-file
+                              inputs (string-append "bin/" command))))
+                          (list "date" "dirname" "grep"
+                                "id" "pgrep" "sed"))))))))))
     (synopsis "Robust, Ubiquitous and Massively Scalable Messaging Platform")
     (description "This package provides Ejabberd -- Robust, Ubiquitous and
 Massively Scalable Messaging Platform.  It supports XMPP, MQTT and SIP

base-commit: bc71034f789603349080c2f35570910c07d526ec
-- 
2.45.2





^ permalink raw reply related	[flat|nested] 3+ messages in thread

end of thread, other threads:[~2024-09-05  6:17 UTC | newest]

Thread overview: 3+ messages (download: mbox.gz follow: Atom feed
-- links below jump to the message on this page --
2024-08-10 12:45 [bug#72560] [PATCH] gnu: ejabberd: Add inputs and wrap-program phase Igor Goryachev via Guix-patches via
2024-08-22 10:21 ` [bug#72560] [PATCH v2] " Igor Goryachev via Guix-patches via
2024-09-05  6:15   ` bug#72560: " Andrew Tropin via Guix-patches via

Code repositories for project(s) associated with this public inbox

	https://git.savannah.gnu.org/cgit/guix.git

This is a public inbox, see mirroring instructions
for how to clone and mirror all data and code used for this inbox;
as well as URLs for read-only IMAP folder(s) and NNTP newsgroup(s).