From 8a191cd529bfab0689ec0c15753458b878232532 Mon Sep 17 00:00:00 2001 From: nek0 Date: Mon, 28 Sep 2015 01:20:44 +0200 Subject: [PATCH] error in migration script --- Migrations/0.0.3-0.0.4/Migration.hs | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/Migrations/0.0.3-0.0.4/Migration.hs b/Migrations/0.0.3-0.0.4/Migration.hs index 32c50b7..e37f427 100644 --- a/Migrations/0.0.3-0.0.4/Migration.hs +++ b/Migrations/0.0.3-0.0.4/Migration.hs @@ -22,7 +22,7 @@ main = do dbPasswd <- getPasswd let dbString = "host=" ++ dbHost ++ " port=" ++ dbPort ++ " user=" ++ dbUser ++ " dbname=" ++ dbName ++ " password=" ++ dbPasswd conn <- connectPostgreSQL dbString - -- Uncomment next two lines, if eidolon has been run after the update + -- comment next two lines, if eidolon has been run after the update _ <- run conn "alter table medium add column preview varchar not null default 'fill_me!'" [] _ <- run conn "alter table medium add column preview_width int8 not null default 0" [] stmt1 <- prepare conn "select * from medium"