summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorTobias Geerinckx-Rice <me@tobias.gr>2020-04-14 07:06:12 +0200
committerTobias Geerinckx-Rice <me@tobias.gr>2020-04-14 07:07:04 +0200
commitea607b355169158fefa796cabb3add66aac7301d (patch)
tree3b012af5ce16cf667a77b3d1b2572a116350061f
parent7059f925ea94ee27a6c9dc8cc1d22bbbc1c0a568 (diff)
downloadpatches-ea607b355169158fefa796cabb3add66aac7301d.tar
patches-ea607b355169158fefa796cabb3add66aac7301d.tar.gz
gnu: kawa: Wrap to find java.
* gnu/packages/kawa.scm (kawa)[arguments]: Add ‘wrap-kawa’ phase to set JAVA_HOME.
-rw-r--r--gnu/packages/kawa.scm11
1 files changed, 10 insertions, 1 deletions
diff --git a/gnu/packages/kawa.scm b/gnu/packages/kawa.scm
index 5771eeda8e..e72e19813c 100644
--- a/gnu/packages/kawa.scm
+++ b/gnu/packages/kawa.scm
@@ -1,6 +1,7 @@
;;; GNU Guix --- Functional package management for GNU
;;; Copyright © 2019 Carlo Zancanaro <carlo@zancanaro.id.au>
;;; Copyright © 2019 Ludovic Courtès <ludo@gnu.org>
+;;; Copyright © 2020 Tobias Geerinckx-Rice <me@tobias.gr>
;;;
;;; This file is part of GNU Guix.
;;;
@@ -38,7 +39,15 @@
(build-system gnu-build-system)
(arguments
`(#:parallel-build? #f
- #:parallel-tests? #f))
+ #:parallel-tests? #f
+ #:phases
+ (modify-phases %standard-phases
+ (add-after 'install 'wrap-kawa
+ (lambda* (#:key inputs outputs #:allow-other-keys)
+ (let ((out (assoc-ref outputs "out")))
+ (wrap-program (string-append out "/share/kawa/bin/kawa")
+ `("JAVA_HOME" ":" = (,(assoc-ref inputs "icedtea"))))
+ #t))))))
(inputs
`(("icedtea" ,icedtea-8 "jdk")))
(home-page "https://www.gnu.org/software/kawa/")