From c39c1688961b16706a2d65a6453f5001fa87ea10 Mon Sep 17 00:00:00 2001 From: Joey Hess Date: Mon, 1 May 2017 10:07:04 -0400 Subject: fix url --- SessionID.hs | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) (limited to 'SessionID.hs') diff --git a/SessionID.hs b/SessionID.hs index 7592e81..956e17f 100644 --- a/SessionID.hs +++ b/SessionID.hs @@ -78,4 +78,4 @@ withSessionID dir a = do go sid hv = a (hv, sid) sessionIDUrl :: SessionID -> URI -> URI -sessionIDUrl (SessionID f) serverurl = serverurl { uriPath = f } +sessionIDUrl (SessionID f) serverurl = serverurl { uriPath = "/" ++ f } -- cgit v1.2.3