From 7b9c4417d54009efd9140860ce07dec97120676f Mon Sep 17 00:00:00 2001 From: Raghav Gururajan Date: Tue, 20 Jul 2021 06:00:34 -0400 Subject: [PATCH] gnu: claws-mail: Use absolute paths to referenced programs. * gnu/packages/mail.scm (claws-mail)[phases](patch-source): New phase. [inputs]: Add mailutils and sendmail. --- gnu/packages/mail.scm | 12 ++++++++++++ 1 file changed, 12 insertions(+) diff --git a/gnu/packages/mail.scm b/gnu/packages/mail.scm index eb7f148b7a..f0f1540cc9 100644 --- a/gnu/packages/mail.scm +++ b/gnu/packages/mail.scm @@ -1629,6 +1629,16 @@ compresses it.") "gtk_update_icon_cache=true") #:phases (modify-phases %standard-phases + (add-after 'unpack 'patch-source + (lambda* (#:key inputs #:allow-other-keys) + ;; Use absolute paths to referenced programs. + (let* ((mailutils (assoc-ref inputs "mailutils")) + (inc (string-append mailutils "/bin/mu-mh/inc")) + (send-mail (assoc-ref inputs "sendmail")) + (sendmail (string-append send-mail "/usr/sbin/sendmail"))) + (substitute* "src/common/defs.h" + (("/usr/bin/mh/inc") inc) + (("/usr/sbin/sendmail") sendmail))))) (add-before 'build 'patch-mime (lambda* (#:key inputs #:allow-other-keys) (substitute* "src/procmime.c" @@ -1674,6 +1684,7 @@ compresses it.") ("libsm" ,libsm) ("libsoup" ,libsoup) ("libxml2" ,libxml2) + ("mailutils" ,mailutils) ("nettle" ,nettle) ("network-manager" ,network-manager) ("openldap" ,openldap) @@ -1681,6 +1692,7 @@ compresses it.") ("poppler" ,poppler) ("python" ,python) ("python-pygobject" ,python-pygobject) + ("sendmail" ,sendmail) ("shared-mime-info" ,shared-mime-info) ("startup-notification" ,startup-notification) ;;("webkitgtk" ,webkitgtk)