gnu: java-picard: Fix manifest.

* gnu/packages/bioinformatics.scm (java-picard)[arguments]: Adjust phase
'edit-classpath-in-manifest for the new manifest generation code.
This commit is contained in:
Gábor Boskovits 2018-07-26 12:42:59 +02:00
parent bca72b39c7
commit d60772dcdd
No known key found for this signature in database
GPG Key ID: 2506A96CCF630B21
1 changed files with 6 additions and 1 deletions

View File

@ -10,6 +10,7 @@
;;; Copyright © 2017, 2018 Tobias Geerinckx-Rice <me@tobias.gr> ;;; Copyright © 2017, 2018 Tobias Geerinckx-Rice <me@tobias.gr>
;;; Copyright © 2017 Arun Isaac <arunisaac@systemreboot.net> ;;; Copyright © 2017 Arun Isaac <arunisaac@systemreboot.net>
;;; Copyright © 2018 Joshua Sierles, Nextjournal <joshua@nextjournal.com> ;;; Copyright © 2018 Joshua Sierles, Nextjournal <joshua@nextjournal.com>
;;; Copyright © 2018 Gábor Boskovits <boskovits@gmail.com>
;;; ;;;
;;; This file is part of GNU Guix. ;;; This file is part of GNU Guix.
;;; ;;;
@ -3240,12 +3241,16 @@ VCF.")
(msg (format #f (msg (format #f
"\ "\
Class-Path: /~a \ Class-Path: /~a \
~a/share/java/htsjdk.jar${line.separator}" ~a/share/java/htsjdk.jar${line.separator}${line.separator}"
;; maximum line length is 70 ;; maximum line length is 70
(string-tabulate (const #\b) 57) (string-tabulate (const #\b) 57)
(assoc-ref inputs "java-htsjdk")))) (assoc-ref inputs "java-htsjdk"))))
(if (member "manifest" name) (if (member "manifest" name)
`(,tag ,@kids `(,tag ,@kids
(replaceregexp
(@ (file "${manifest.file}")
(match "\\r\\n\\r\\n")
(replace "${line.separator}")))
(echo (echo
(@ (message ,msg) (@ (message ,msg)
(file "${manifest.file}") (file "${manifest.file}")