From 9bc75d16fb06548f5113a51796b22ab1e42f7c2d Mon Sep 17 00:00:00 2001 From: Joey Hess Date: Fri, 6 Dec 2013 18:18:05 -0400 Subject: support for opening urls on windows --- Utility/WebApp.hs | 4 ++++ 1 file changed, 4 insertions(+) (limited to 'Utility/WebApp.hs') diff --git a/Utility/WebApp.hs b/Utility/WebApp.hs index 7148dfce3..2f3ebfb5b 100644 --- a/Utility/WebApp.hs +++ b/Utility/WebApp.hs @@ -53,9 +53,13 @@ browserProc url = proc "open" [url] browserProc url = proc "am" ["start", "-a", "android.intent.action.VIEW", "-d", url] #else +#ifdef mingw32_HOST_OS +browserProc url = proc "cmd" ["/c", "start", url] +#else browserProc url = proc "xdg-open" [url] #endif #endif +#endif {- Binds to a socket on localhost, or possibly a different specified - hostname or address, and runs a webapp on it. -- cgit v1.2.3