aboutsummaryrefslogtreecommitdiff
path: root/tests/packages.scm
diff options
context:
space:
mode:
authorMathieu Lirzin <mthl@gnu.org>2016-01-24 17:42:39 +0100
committerMathieu Lirzin <mthl@gnu.org>2016-01-28 16:31:38 +0100
commit74e667d14912b9243043b43995848d962569a9a1 (patch)
tree48bc9d3cc69c836e76e77037d06bf751575a2566 /tests/packages.scm
parentf3044a4b7b4fd8b51a65c95bca1d22b252863dc9 (diff)
downloadguix-74e667d14912b9243043b43995848d962569a9a1.tar
guix-74e667d14912b9243043b43995848d962569a9a1.tar.gz
packages: Use '@' in package record printers.
* guix/packages.scm <package>: Use '@' in record printer. * guix/import/cabal.scm <cabal-package>: Likewise * guix/import/elpa.scm <elpa-package>: Likewise. * tests/packages.scm: Adapt to it.
Diffstat (limited to 'tests/packages.scm')
-rw-r--r--tests/packages.scm4
1 files changed, 2 insertions, 2 deletions
diff --git a/tests/packages.scm b/tests/packages.scm
index 6a2f4f06e1..9d37fb68d6 100644
--- a/tests/packages.scm
+++ b/tests/packages.scm
@@ -58,7 +58,7 @@
(test-begin "packages")
(test-assert "printer with location"
- (string-match "^#<package foo-0 foo.scm:42 [[:xdigit:]]+>$"
+ (string-match "^#<package foo@0 foo.scm:42 [[:xdigit:]]+>$"
(with-output-to-string
(lambda ()
(write
@@ -66,7 +66,7 @@
(location (make-location "foo.scm" 42 7))))))))
(test-assert "printer without location"
- (string-match "^#<package foo-0 [[:xdigit:]]+>$"
+ (string-match "^#<package foo@0 [[:xdigit:]]+>$"
(with-output-to-string
(lambda ()
(write