From d37675b1fd3ded29019d994524630952576c961d Mon Sep 17 00:00:00 2001
From: Joey Hess <joey@kitenet.net>
Date: Mon, 19 May 2014 11:00:01 -0400
Subject: [PATCH] work around utterly strange ubuntu ghc  Conflicting
 definitions for `_' problem

---
 Assistant/WebApp/Bootstrap3.hs | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/Assistant/WebApp/Bootstrap3.hs b/Assistant/WebApp/Bootstrap3.hs
index 5b2dad03e4..eee7945d30 100644
--- a/Assistant/WebApp/Bootstrap3.hs
+++ b/Assistant/WebApp/Bootstrap3.hs
@@ -177,7 +177,7 @@ renderBootstrap3 formLayout aform fragment = do
                       <label .sr-only for=#{fvId view}>#{fvLabel view}
                     ^{fvInput view}
                     ^{helpWidget view}
-                  $of BootstrapHorizontalForm _ _ _ _
+                  $of BootstrapHorizontalForm {}
                     $if nequals (fvId view) bootstrapSubmitId
                       <label .control-label .#{toOffset (bflLabelOffset formLayout)} .#{toColumn (bflLabelSize formLayout)} for=#{fvId view}>#{fvLabel view}
                       <div .#{toOffset (bflInputOffset formLayout)} .#{toColumn (bflInputSize formLayout)}>