deleted some commented code

This commit is contained in:
Ruslan Talpa
2015-09-25 15:28:48 +03:00
parent ff2c0b63e2
commit 2fb5c5187a
3 changed files with 0 additions and 73 deletions
-14
View File
@@ -212,17 +212,3 @@ allprimaryKeys = do
)
|]
return $ map pkFromRow pks
-- alltablesAcl :: H.Tx P.Postgres s [(Text, Text, Text)]
-- alltablesAcl = do
-- acl <- H.listEx $ [H.stmt|
-- SELECT
-- table_schema,
-- table_name,
-- grantee as role
-- FROM information_schema.role_table_grants
-- WHERE
-- table_schema NOT IN ('pg_catalog', 'information_schema') AND
-- privilege_type = 'SELECT'
-- |]
-- return acl