diff options
author | Ludovic Courtès <ludo@gnu.org> | 2015-02-02 12:29:12 +0100 |
---|---|---|
committer | Ludovic Courtès <ludo@gnu.org> | 2015-02-02 12:46:36 +0100 |
commit | 5f1f10c59d2b1bdc02f83abe9610d5ee77a83be2 (patch) | |
tree | de5744b38efd978714338de275d850520da5d13a | |
parent | abac874b22532a17a868443dc1f883ed483b0604 (diff) | |
download | guix-5f1f10c59d2b1bdc02f83abe9610d5ee77a83be2.tar.gz |
tests: Don't dump the list of dead items in the test log.
* tests/store.scm ("dead-paths"): Wrap result in '->bool'.
-rw-r--r-- | tests/store.scm | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/tests/store.scm b/tests/store.scm index db7299fc70..ee783be846 100644 --- a/tests/store.scm +++ b/tests/store.scm @@ -119,7 +119,7 @@ (test-assert "dead-paths" (let ((p (add-text-to-store %store "random-text" (random-text)))) - (member p (dead-paths %store)))) + (->bool (member p (dead-paths %store))))) ;; FIXME: Find a test for `live-paths'. ;; |