me/guix
Archived
1
0
Fork 0
Code Activity

gnu: exo: Fix exo-compose-mail.

Browse source 
Fixes <https://issues.guix.gnu.org/issue/41244>.

* gnu/packages/xfce.scm (exo)[arguments]: Add wrap-exo-compose-mail phase so
it can find URI::Escape from perl-uri.

Signed-off-by: Ricardo Wurmus <rekado@elephly.net>
This commit is contained in:
Jonathan Brielmaier 2020-05-14 12:53:41 +02:00 • committed by Ricardo Wurmus
parent 355892e1c2
commit 5c7e477c6c
No known key found for this signature in database
GPG key ID: 197A5888235FACAC
1 changed files with 14 additions and 0 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

14
gnu/packages/xfce.scm
View file

@ -12,6 +12,7 @@
;;; Copyright © 2019 L p R n d n <guix@lprndn.info> ;;; Copyright © 2019 L p R n d n <guix@lprndn.info>
;;; Copyright © 2019 Ingo Ruhnke <grumbel@gmail.com> ;;; Copyright © 2019 Ingo Ruhnke <grumbel@gmail.com>
;;; Copyright © 2020 Vincent Legoll <vincent.legoll@gmail.com> ;;; Copyright © 2020 Vincent Legoll <vincent.legoll@gmail.com>
;;; Copyright © 2020 Jonathan Brielmaier <jonathan.brielmaier@web.de>
;;; ;;;
;;; This file is part of GNU Guix. ;;; This file is part of GNU Guix.
;;; ;;;
@ -213,6 +214,19 @@ to share commonly used Xfce widgets among the Xfce applications.")
(base32 (base32
"1dp5s64g6572h9zvx9js7qc72s728qsd9y7hl7hg6rwaq0cjb2gc")))) "1dp5s64g6572h9zvx9js7qc72s728qsd9y7hl7hg6rwaq0cjb2gc"))))
(build-system gnu-build-system) (build-system gnu-build-system)
(arguments
`(#:phases
(modify-phases %standard-phases
;; exo won't find URI::Escape otherwise
(add-after 'install 'wrap-exo-compose-mail
(lambda* (#:key outputs #:allow-other-keys)
(let* ((out (assoc-ref outputs "out"))
(perl5lib (getenv "PERL5LIB")))
(wrap-program (string-append out "/lib/xfce4/exo/exo-compose-mail")
`("PERL5LIB" ":" prefix
(,(string-append perl5lib ":" out
"/lib/perl5/site_perl")))))
#t)))))
(native-inputs (native-inputs
`(("pkg-config" ,pkg-config) `(("pkg-config" ,pkg-config)
("intltool" ,intltool))) ("intltool" ,intltool)))