From 2d31b3155dd4053b83860387a059b594d4aeadce Mon Sep 17 00:00:00 2001
From: Maximilian Tagher <feedback.tagher@gmail.com>
Date: Sat, 22 Nov 2014 17:23:12 -0800
Subject: [PATCH] Improves code formatting

* Fixes bug where @<button>@ was being treated as a Haskell function reference
* Uses '<*' instead of @<*@, since <* is a Haskell function (though this doesn't appear to make the link work)
---
 yesod-form/Yesod/Form/Bootstrap3.hs | 6 +++---
 1 file changed, 3 insertions(+), 3 deletions(-)

diff --git a/yesod-form/Yesod/Form/Bootstrap3.hs b/yesod-form/Yesod/Form/Bootstrap3.hs
index dd50985a..8377a68f 100644
--- a/yesod-form/Yesod/Form/Bootstrap3.hs
+++ b/yesod-form/Yesod/Form/Bootstrap3.hs
@@ -203,9 +203,9 @@ data BootstrapSubmit msg =
         { bsValue   :: msg
           -- ^ The text of the submit button.
         , bsClasses :: Text
-          -- ^ Classes added to the @<button>@.
+          -- ^ Classes added to the @\<button>@.
         , bsAttrs   :: [(Text, Text)]
-          -- ^ Attributes added to the @<button>@.
+          -- ^ Attributes added to the @\<button>@.
         } deriving (Show)
 
 instance IsString msg => IsString (BootstrapSubmit msg) where
@@ -224,7 +224,7 @@ instance IsString msg => IsString (BootstrapSubmit msg) where
 -- >        <*> areq textField "Surname" Nothing
 -- >        <*  bootstrapSubmit ("Register" :: BootstrapSubmit Text)
 --
--- (Note that @<*@ is not a typo.)
+-- (Note that '<*' is not a typo.)
 --
 -- Alternatively, you may also just create the submit button
 -- manually as well in order to have more control over its