Fix doc syntax problem to make haddocks build.

jaspervdj · Jul 13, 2012 · 3715e9a · 3715e9a
1 parent f8cee17
commit 3715e9a
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/digestive-functors/src/Text/Digestive/Field.hs b/digestive-functors/src/Text/Digestive/Field.hs
@@ -26,7 +26,7 @@ import           Text.Digestive.Types
 data Field v a where
     Singleton :: a -> Field v a
     Text      :: Text -> Field v Text
-    -- | A list of identifier, value, view. Then we have the default index in
+    -- A list of identifier, value, view. Then we have the default index in
     -- the list. The return value has the actual value as well as the index in
     -- the list.
     Choice    :: [(Text, (a, v))] -> Int -> Field v (a, Int)