From b40d441c52f37584653e74fada9906cc8105c9f7 Mon Sep 17 00:00:00 2001 From: Joey Hess Date: Thu, 6 Oct 2016 13:54:52 -0400 Subject: move level from Server to Storage This allows local storage locations to have levels too, and also get shuffled nicely. This commit was sponsored by Ethan Aubin. --- Tests.hs | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) (limited to 'Tests.hs') diff --git a/Tests.hs b/Tests.hs index 7955c7f..7294cfb 100644 --- a/Tests.hs +++ b/Tests.hs @@ -75,7 +75,7 @@ withTestStorageLocations a = bracket setup cleanup go setup = mkdtemp "keysafe-test" cleanup = removeDirectoryRecursive go tmpdir = a $ StorageLocations $ - map (localStorage (testStorageDir tmpdir) . show) + map (localStorage LocallyPreferred (testStorageDir tmpdir) . show) [1..100 :: Int] -- | Test of backup and restore of a SecretKey. -- cgit v1.2.3