diff options
-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'. ;; |