~ruther/guix-local: gnu: r-gdsfmt: Adjust bad substitution.

b28cd884b861f623d9691c58e4eb17ae5cf38117 — Ricardo Wurmus 5 years ago 0398a89

gnu: r-gdsfmt: Adjust bad substitution.

* gnu/packages/bioconductor.scm (r-gdsfmt)[source]: Include beginning-of-line
anchor in substitution regular expression.

patch browse .tar.gz .zip

1 files changed, 2 insertions(+), 3 deletions(-)

M gnu/packages/bioconductor.scm

M gnu/packages/bioconductor.scm => gnu/packages/bioconductor.scm +2 -3

@@ 10548,7 10548,7 @@ metrics, with methods for objects produced by the @code{methylumi} and
            (substitute* "src/Makevars"
              (("all: \\$\\(SHLIB\\)") "all:")
              (("\\$\\(SHLIB\\): liblzma.a") "")
-             (("(ZLIB|LZ4)/.*") "")
+             (("^	(ZLIB|LZ4)/.*") "")
              (("CoreArray/dVLIntGDS.cpp.*")
               "CoreArray/dVLIntGDS.cpp")
              (("CoreArray/dVLIntGDS.o.*")


@@ 10557,8 10557,7 @@ metrics, with methods for objects produced by the @code{methylumi} and
               "PKG_LIBS = -llz4"))
            (substitute* "src/CoreArray/dStream.h"
              (("include \"../(ZLIB|LZ4|XZ/api)/(.*)\"" _ _ header)
-              (string-append "include <" header ">")))
-           #t))))
+              (string-append "include <" header ">")))))))
     (properties `((upstream-name . "gdsfmt")))
     (build-system r-build-system)
     (inputs