tests: Strengthen regexp in 'packages.scm'.

* tests/packages.scm ("--search-paths with pattern"): Call
'regexp-quote' on the result of 'derivation->output-path'.
This commit is contained in:
Ludovic Courtès 2016-06-19 23:51:58 +02:00
parent 04eb0fab3a
commit 77559f23b0
No known key found for this signature in database
GPG key ID: 090B11993D9AEBB5

View file

@ -797,7 +797,7 @@ (define read-at
#:guile-for-build (%guile-for-build))))
(build-derivations %store (list prof))
(string-match (format #f "^export XML_CATALOG_FILES=\"~a/xml/+bar/baz/catalog\\.xml\"\n"
(derivation->output-path prof))
(regexp-quote (derivation->output-path prof)))
(with-output-to-string
(lambda ()
(guix-package "-p" (derivation->output-path prof)