This commit is contained in:
Ruslan Talpa
2015-10-01 10:36:33 +03:00
parent ffeb8b1d5f
commit 8ff4b4be66
+1 -1
View File
@@ -91,7 +91,7 @@ main = do
dbstructure <- case metadata of
Left e -> fail $ show e
Right (tabs, rels, cols, keys) ->
return $ DbStructure {
return DbStructure {
tables=tabs
, columns=cols
, relations=rels