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

[dead/htsn-import.git] / src / TSN / XML / News.hs

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