summary refs log tree commit diff
diff options
context:
space:
mode:
authorRicardo Wurmus <rekado@elephly.net>2023-01-09 00:44:26 +0100
committerRicardo Wurmus <rekado@elephly.net>2023-01-09 00:44:26 +0100
commitf05d22847275f1d226a42dc044e31ba73e0a68c4 (patch)
tree9b738faf52868f2dfc04f6d2d11e3019e48657d6
parent882baf4b7da4510af9113bb1b602da4793137013 (diff)
downloadguix-f05d22847275f1d226a42dc044e31ba73e0a68c4.tar.gz
gnu: ant-apache-bcel: Fix inheritance by using gexp.
* gnu/packages/java.scm (ant-apache-bcel)[arguments]: Use gexp; also remove
trailing #T from build phases.
-rw-r--r--gnu/packages/java.scm39
1 files changed, 18 insertions, 21 deletions
diff --git a/gnu/packages/java.scm b/gnu/packages/java.scm
index c81b889431..0124491fa6 100644
--- a/gnu/packages/java.scm
+++ b/gnu/packages/java.scm
@@ -1713,27 +1713,24 @@ build process and its dependencies, whereas Make uses Makefile format.")
     (arguments
      (substitute-keyword-arguments (package-arguments ant/java8)
        ((#:phases phases)
-        `(modify-phases ,phases
-           (add-after 'unpack 'link-bcel
-             (lambda* (#:key inputs #:allow-other-keys)
-               (for-each (lambda (file)
-                           (symlink file
-                                    (string-append "lib/optional/"
-                                                   (basename file))))
-                         (find-files (assoc-ref inputs "java-commons-bcel")
-                                     "\\.jar$"))
-               #t))
-           (add-after 'build 'install
-             (lambda* (#:key outputs #:allow-other-keys)
-               (let* ((out   (assoc-ref outputs "out"))
-                      (share (string-append out "/share/java"))
-                      (bin   (string-append out "/bin"))
-                      (lib   (string-append out "/lib")))
-                 (mkdir-p share)
-                 (install-file (string-append lib "/ant-apache-bcel.jar") share)
-                 (delete-file-recursively bin)
-                 (delete-file-recursively lib)
-                 #t)))))))
+        #~(modify-phases #$phases
+            (add-after 'unpack 'link-bcel
+              (lambda* (#:key inputs #:allow-other-keys)
+                (for-each (lambda (file)
+                            (symlink file
+                                     (string-append "lib/optional/"
+                                                    (basename file))))
+                          (find-files (assoc-ref inputs "java-commons-bcel")
+                                      "\\.jar$"))))
+            (add-after 'build 'install
+              (lambda _
+                (let ((share (string-append #$output "/share/java"))
+                      (bin   (string-append #$output "/bin"))
+                      (lib   (string-append #$output "/lib")))
+                  (mkdir-p share)
+                  (install-file (string-append lib "/ant-apache-bcel.jar") share)
+                  (delete-file-recursively bin)
+                  (delete-file-recursively lib))))))))
     (inputs
      (modify-inputs (package-inputs ant/java8)
        (prepend java-commons-bcel)))))