summaryrefslogtreecommitdiffhomepage
path: root/Storage.hs
diff options
context:
space:
mode:
authorJoey Hess <joeyh@joeyh.name>2016-08-30 16:29:22 -0400
committerJoey Hess <joeyh@joeyh.name>2016-08-30 16:44:18 -0400
commit15ea23acdb00fa964d91d440274e3a78bd115083 (patch)
tree6b3163113e7e4c252041fe7293d4ac251de64d0c /Storage.hs
parent7796b4c1570595bb79a9615cd2761420d2737c3e (diff)
downloadkeysafe-15ea23acdb00fa964d91d440274e3a78bd115083.tar.gz
Added basic test suite.
Diffstat (limited to 'Storage.hs')
-rw-r--r--Storage.hs2
1 files changed, 1 insertions, 1 deletions
diff --git a/Storage.hs b/Storage.hs
index 85e52a6..c9446c5 100644
--- a/Storage.hs
+++ b/Storage.hs
@@ -24,7 +24,7 @@ allStorageLocations = do
localStorageLocations :: StorageLocations
localStorageLocations = StorageLocations $
- map (localStorage . ("local" </>) . show)
+ map (localStorage userStorageDir . ("local" </>) . show)
[1..100 :: Int]
type UpdateProgress = IO ()