diff options
author | Ludovic Courtès <ludo@gnu.org> | 2016-06-19 23:51:58 +0200 |
---|---|---|
committer | Ludovic Courtès <ludo@gnu.org> | 2016-06-20 00:52:53 +0200 |
commit | 77559f23b02f80d9e5dd4030e1f67cd954a871ac (patch) | |
tree | 0521d72f2c5c143c89756511e0cddd56c1095209 /tests | |
parent | 04eb0fab3a5df2c04299b2a4263b966140f11990 (diff) | |
download | patches-77559f23b02f80d9e5dd4030e1f67cd954a871ac.tar patches-77559f23b02f80d9e5dd4030e1f67cd954a871ac.tar.gz |
tests: Strengthen regexp in 'packages.scm'.
* tests/packages.scm ("--search-paths with pattern"): Call
'regexp-quote' on the result of 'derivation->output-path'.
Diffstat (limited to 'tests')
-rw-r--r-- | tests/packages.scm | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/tests/packages.scm b/tests/packages.scm index d3f432ada2..94f5ea71a5 100644 --- a/tests/packages.scm +++ b/tests/packages.scm @@ -797,7 +797,7 @@ #: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) |