Un-haddock two comments that wound up in the wrong place due to template haskell.

diff --git a/src/TSN/XML/News.hs b/src/TSN/XML/News.hs
index 7d8ef754a0081a16679200b4c2c4fd2869f28d21..6e10aed9d166089d7119b543066340a28596f717 100644 (file)
--- a/src/TSN/XML/News.hs
+++ b/src/TSN/XML/News.hs
@@ -227,9 +227,9 @@ instance DbImport Message where
     return ImportSucceeded
 
 
--- | These types don't have special XML representations or field name
---   collisions so we use the defaultCodegenConfig and give their
---   fields nice simple names.
+-- These types don't have special XML representations or field name
+-- collisions so we use the defaultCodegenConfig and give their
+-- fields nice simple names.
 mkPersist defaultCodegenConfig [groundhog|
 - entity: NewsTeam
   dbName: news_teams
@@ -252,9 +252,8 @@ mkPersist defaultCodegenConfig [groundhog|
 |]
 
 
--- | These types have fields with e.g. db_ and xml_ prefixes, so we
---   use our own codegen to peel those off before naming the columns.
---
+-- These types have fields with e.g. db_ and xml_ prefixes, so we
+-- use our own codegen to peel those off before naming the columns.
 mkPersist tsn_codegen_config [groundhog|
 - entity: News
   dbName: news

diff --git a/src/TSN/XML/Odds.hs b/src/TSN/XML/Odds.hs
index 509b436d05760022d636e42a51a53e3249920087..3e231c2ba3c9653b32b02795dc926df6f6b2d288 100644 (file)
--- a/src/TSN/XML/Odds.hs
+++ b/src/TSN/XML/Odds.hs
@@ -367,9 +367,8 @@ instance XmlImport Message
 
 
 
--- | Groundhog database schema. This must come before the DbImport
---   instance definition.
---
+-- Groundhog database schema. This must come before the DbImport
+-- instance definition.
 mkPersist tsn_codegen_config [groundhog|
 - entity: Odds