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 /tests/store.scm | |
| parent | abac874b22532a17a868443dc1f883ed483b0604 (diff) | |
| download | patches-5f1f10c59d2b1bdc02f83abe9610d5ee77a83be2.tar patches-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'.
Diffstat (limited to 'tests/store.scm')
| -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'. ;; |