03/08: gnu: java-javaee-servletapi: Add properties-files to jar.

[guix-commits]

hoebjo pushed a commit to branch staging
in repository guix.

commit 8ea8d607f978bbbf5d3062a52797f106a2beb041
Author: Björn Höfling <address@hidden>
Date:   Mon Mar 4 18:42:22 2019 +0100

    gnu: java-javaee-servletapi: Add properties-files to jar.
    
    * gnu/packages/java.scm (jav-javaee-servletapi)[arguments]: Add phase
    'copy-resources' to copy properties-files.
---
 gnu/packages/java.scm | 20 +++++++++++++++++++-
 1 file changed, 19 insertions(+), 1 deletion(-)

diff --git a/gnu/packages/java.scm b/gnu/packages/java.scm
index 9c1cec2..ace50f3 100644
--- a/gnu/packages/java.scm
+++ b/gnu/packages/java.scm
@@ -2955,7 +2955,25 @@ API and version 2.1 of the Java ServerPages API.")
      `(#:jar-name "javax-servletapi.jar"
        ;; no tests
        #:tests? #f
-       #:source-dir "src/main/java"))
+       #:source-dir "src/main/java"
+       #:phases
+       (modify-phases %standard-phases
+         (add-before 'build 'copy-resources
+           (lambda _
+             (mkdir-p "build/classes/javax/servlet/http")
+             (let ((from-prefix "src/main/java/javax/servlet/")
+                   (to-prefix "build/classes/javax/servlet/"))
+               (for-each (lambda (f)
+                           (copy-file (string-append from-prefix f)
+                                      (string-append to-prefix f)))
+                         (list "LocalStrings_ja.properties"
+                               "LocalStrings.properties"
+                               "LocalStrings_fr.properties"
+                               "http/LocalStrings_es.properties"
+                               "http/LocalStrings_ja.properties"
+                               "http/LocalStrings.properties"
+                               "http/LocalStrings_fr.properties")))
+               #t)))))
     (native-inputs
      `(("unzip" ,unzip)))
     (home-page "https://javaee.github.io/servlet-spec/";)