08/16: gnu: r-seurat: Fix ModularityOptimizer.jar.

[Ricardo Wurmus]

rekado pushed a commit to branch master
in repository guix.

commit 8271b8d22a84ded6bfd2a81531116d00347c653c
Author: Ricardo Wurmus <address@hidden>
Date:   Mon Dec 18 11:56:12 2017 +0100

    gnu: r-seurat: Fix ModularityOptimizer.jar.
    
    * gnu/packages/bioinformatics.scm (r-seurat)[arguments]: Include Main-Class
    attribute in manifest.
---
 gnu/packages/bioinformatics.scm | 16 +++++++++++-----
 1 file changed, 11 insertions(+), 5 deletions(-)

diff --git a/gnu/packages/bioinformatics.scm b/gnu/packages/bioinformatics.scm
index 58421d3..99693bd 100644
--- a/gnu/packages/bioinformatics.scm
+++ b/gnu/packages/bioinformatics.scm
@@ -9427,11 +9427,17 @@ and irregular enzymatic cleavages, mass measurement 
accuracy, etc.")
                (let ((classesdir "tmp-classes"))
                  (setenv "JAVA_HOME" (assoc-ref inputs "jdk"))
                  (mkdir classesdir)
-                 (and (zero? (apply system* `("javac" "-d" ,classesdir
-                                              ,@(find-files "java" 
"\\.java$"))))
-                      (zero? (system* "jar"
-                                      "-cf" "inst/java/ModularityOptimizer.jar"
-                                      "-C" classesdir ".")))))))))
+
+                 (with-output-to-file "manifest"
+                 (lambda _
+                   (display "Manifest-Version: 1.0
+Main-Class: ModularityOptimizer\n")))
+               (and (zero? (apply system* `("javac" "-d" ,classesdir
+                                            ,@(find-files "java" "\\.java$"))))
+                    (zero? (system* "jar"
+                                    "-cmf" "manifest"
+                                    "inst/java/ModularityOptimizer.jar"
+                                    "-C" classesdir ".")))))))))
       (native-inputs
        `(("jdk" ,icedtea "jdk")))
       (propagated-inputs