From 15ea23acdb00fa964d91d440274e3a78bd115083 Mon Sep 17 00:00:00 2001 From: Joey Hess Date: Tue, 30 Aug 2016 16:29:22 -0400 Subject: Added basic test suite. --- HTTP/Server.hs | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) (limited to 'HTTP') diff --git a/HTTP/Server.hs b/HTTP/Server.hs index fa2e8da..3e0b9aa 100644 --- a/HTTP/Server.hs +++ b/HTTP/Server.hs @@ -40,7 +40,7 @@ runServer bindaddress port = do host = fromString bindaddress serverStorage :: Storage -serverStorage = localStorage "server" +serverStorage = localStorage userStorageDir "server" app :: ServerState -> Application app st = serve userAPI (server st) -- cgit v1.2.3