Subject: [bug#72560] [PATCH v2] gnu: ejabberd: Add inputs and wrap-program phase.

From: Andrew Tropin <[email-masked]>
Date: Thu, 05 Sep 2024 10:15:03 +0400

On 2024-08-22 13:21, Igor Goryachev via Guix-patches via wrote:

> * 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 8509b0c71a..8ea56c5eb8 100644
> --- a/gnu/packages/messaging.scm
> +++ b/gnu/packages/messaging.scm
> @@ -3647,6 +3647,7 @@ (define-public ejabberd
>         (sha256
>          (base32 "0d5i9skgfjzs2100k0g99sigc2w61480ysz3va6pmb4nx43100g3"))))
>      (build-system rebar-build-system)
> +    (inputs (list bash-minimal coreutils procps sed))
>      (native-inputs
>       (list autoconf
>             automake
> @@ -3759,7 +3760,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: 174ecf5b1077d29498d9de22e27b13047f314feb

Hi Igor!

thank you for the patch, applied, pushed as 
https://git.savannah.gnu.org/cgit/guix.git/commit/?id=cb7de07a51

-- 
Best regards,
Andrew Tropin