jimmy/postgrest
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

Fix quasi-quote in tables function

Browse Source
This commit is contained in:
Joe Nelson
2014-07-06 18:42:31 -07:00
parent 293d5f6581
commit e8e8d96e97
1 changed files with 3 additions and 3 deletions
Download Patch File Download Diff File Expand all files Collapse all files
PgStructure.hs
+3 -3
View File
@@ -68,9 +68,9 @@ instance JSON.ToJSON Column where
tables :: String -> Connection -> IO [Table] tables :: String -> Connection -> IO [Table]
tables s conn = query conn q $ Only s tables s conn = query conn q $ Only s
where q = [sql| where q = [sql|
select table_schema, table_name,\ select table_schema, table_name,
is_insertable_into \ is_insertable_into
from information_schema.tables\ from information_schema.tables
where table_schema = ? |] where table_schema = ? |]
columns :: T.Text -> Connection -> IO [Column] columns :: T.Text -> Connection -> IO [Column]