Use integers for schemas in insert

src/PgStructure.hs

@@ -1,5 +1,8 @@
+-- {{{ Imports
+
 {-# LANGUAGE OverloadedStrings #-}
 
+
 module PgStructure where
 
 import Data.Functor ( (<$>) )
@@ -18,6 +21,8 @@ import Database.HDBC.PostgreSQL
 
 import Data.Aeson ((.=))
 
+-- }}}
+
 data Table = Table {
   tableSchema :: String
 , tableName :: String