X-Git-Url: http://gitweb.michael.orlitzky.com/?a=blobdiff_plain;f=src%2FTSN%2FCodegen.hs;h=0e8026d53eb068bc45128aa26c86e84ffc4aaea0;hb=e3272460a03b4bdded1902467310a4190feb333f;hp=9095cefe6860ff5f8837ec1a1fa42fa6a47cceaf;hpb=ef96e8bf0cadf5d602022f8c91914d3cabeb35a0;p=dead%2Fhtsn-import.git

diff --git a/src/TSN/Codegen.hs b/src/TSN/Codegen.hs
index 9095cef..0e8026d 100644
--- a/src/TSN/Codegen.hs
+++ b/src/TSN/Codegen.hs
@@ -36,6 +36,7 @@ tsn_db_field_namer :: String -> String -> Int -> String -> Int -> String
 tsn_db_field_namer _ _ _ fieldname _ =
   (join "_") . tail . (split "_") $ fieldname
 
+
 -- | An expression field name creator. \"Expression\" in the context
 --   of Groundhog means a constructor/type that you can use in queries
 --   and update statement. We take the field name (from a record type)