summaryrefslogtreecommitdiff
path: root/Utility/WebApp.hs
diff options
context:
space:
mode:
authorGravatar Joey Hess <joey@kitenet.net>2014-06-10 18:29:15 -0400
committerGravatar Joey Hess <joey@kitenet.net>2014-06-10 18:37:33 -0400
commit465c36e8f6a45b888e8f7be8baa52f0eb1759f77 (patch)
tree9e3750f04e534f5ce616e3362b7196d47fa333bf /Utility/WebApp.hs
parented8db68eca09a672666864fb9b84c14e6c106d67 (diff)
Windows: Fix opening webapp when repository is in a directory with spaces in the path.
Diffstat (limited to 'Utility/WebApp.hs')
-rw-r--r--Utility/WebApp.hs4
1 files changed, 4 insertions, 0 deletions
diff --git a/Utility/WebApp.hs b/Utility/WebApp.hs
index 6af324e51..c5e2a439e 100644
--- a/Utility/WebApp.hs
+++ b/Utility/WebApp.hs
@@ -61,6 +61,10 @@ browserProc url = proc "am"
["start", "-a", "android.intent.action.VIEW", "-d", url]
#else
#ifdef mingw32_HOST_OS
+-- Warning: On Windows, no quoting or escaping of the url seems possible,
+-- so spaces in it will cause problems. One approach is to make the url
+-- be a relative filename, and adjust the returned CreateProcess to change
+-- to the directory it's in.
browserProc url = proc "cmd" ["/c start " ++ url]
#else
browserProc url = proc "xdg-open" [url]