diff options
author | Arun Isaac <arunisaac@systemreboot.net> | 2022-11-15 00:19:16 +0530 |
---|---|---|
committer | Arun Isaac <arunisaac@systemreboot.net> | 2022-11-15 00:19:16 +0530 |
commit | d0118c9930f1f4fac7c9f75c3894b141566561ec (patch) | |
tree | e9499973e15b33c915eb06ee29aabdb8b683a15d /gnu | |
parent | 0581f1118130d96d522fae78d230457a32755956 (diff) | |
download | guix-d0118c9930f1f4fac7c9f75c3894b141566561ec.tar.gz guix-d0118c9930f1f4fac7c9f75c3894b141566561ec.zip |
gnu: prosody: Invoke prosody wrapper script directly.
* gnu/packages/messaging.scm (prosody)[arguments]: Add invoke-prosody-wrapper
phase.
Diffstat (limited to 'gnu')
-rw-r--r-- | gnu/packages/messaging.scm | 9 |
1 files changed, 9 insertions, 0 deletions
diff --git a/gnu/packages/messaging.scm b/gnu/packages/messaging.scm index db1c96f9dc..9927c7c323 100644 --- a/gnu/packages/messaging.scm +++ b/gnu/packages/messaging.scm @@ -1538,6 +1538,15 @@ Qt-based XMPP library QXmpp.") (("^INSTALLEDCONFIG =.*") "INSTALLEDCONFIG = /etc/prosody\n") ;; prosodyctl needs a place to put auto-generated certificates. (("^INSTALLEDDATA =.*") "INSTALLEDDATA = /var/lib/prosody\n")))) + (add-after 'unpack 'invoke-prosody-wrapper + (lambda* (#:key inputs outputs #:allow-other-keys) + ;; Invoke the prosody wrapper script instead of invoking lua on + ;; the actual executable. + (substitute* "util/prosodyctl.lua" + (("os.execute\\(lua[^;]*") + (string-append "os.execute(\"" + (assoc-ref outputs "out") + "/bin/prosody -D\")"))))) (add-after 'install 'wrap-programs (lambda* (#:key inputs outputs #:allow-other-keys) ;; Make sure all executables in "bin" find the required Lua |