From 9917d2c94ccfb6ae4936bd87205a2ad499580ba6 Mon Sep 17 00:00:00 2001 From: Joey Hess Date: Sun, 10 May 2015 15:44:47 -0400 Subject: [PATCH] fix build warning with ghc 7.10 --- Assistant/WebApp/Types.hs | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/Assistant/WebApp/Types.hs b/Assistant/WebApp/Types.hs index ad2b93b3cc..ea5150be98 100644 --- a/Assistant/WebApp/Types.hs +++ b/Assistant/WebApp/Types.hs @@ -105,7 +105,7 @@ type MkMForm x = MForm Handler (FormResult x, Widget) type MkAForm x = AForm Handler x -type MkField x = Monad m => RenderMessage (HandlerSite m) FormMessage => Field m x +type MkField x = forall m. Monad m => RenderMessage (HandlerSite m) FormMessage => Field m x data RepoSelector = RepoSelector { onlyCloud :: Bool