summaryrefslogtreecommitdiffhomepage
path: root/HTTP/Server.hs
diff options
context:
space:
mode:
Diffstat (limited to 'HTTP/Server.hs')
-rw-r--r--HTTP/Server.hs2
1 files changed, 1 insertions, 1 deletions
diff --git a/HTTP/Server.hs b/HTTP/Server.hs
index 886fe6f..6fd570d 100644
--- a/HTTP/Server.hs
+++ b/HTTP/Server.hs
@@ -56,7 +56,7 @@ runServer d cfg = do
host = fromString (serverAddress cfg)
serverStorage :: Maybe LocalStorageDirectory -> Storage
-serverStorage d = localStorage (storageDir d) "server"
+serverStorage d = localStorage LocallyPreferred (storageDir d) "server"
app :: ServerState -> Application
app st = serve userAPI (server st)