Commit 2613fdff authored by Michael Hanus's avatar Michael Hanus
Browse files

Small file renaming in erd2cdbi

parent ca580926
......@@ -82,7 +82,7 @@ writeCDBI (ERD name ents rels) dbPath newDB = do
"import Database.CDBI.Description \n \n")
mapIO_ (\x -> (writeEntityData x file)) ents
hClose file
file2 <- openFile (name++"_SQLParserInfo.info") WriteMode
file2 <- openFile (name++"_SQLCode.info") WriteMode
writeParserFile file2 ents rels dbPath
hClose file2
if newDB then do
......
Supports Markdown
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment