From 2d2e12a109a0d344dbb07773cbd9f72d8cd60b3a Mon Sep 17 00:00:00 2001 From: nek0 Date: Mon, 28 Sep 2015 01:35:34 +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 e37f427..9778d5b 100644 --- a/Migrations/0.0.3-0.0.4/Migration.hs +++ b/Migrations/0.0.3-0.0.4/Migration.hs @@ -47,7 +47,7 @@ main = do setImageCompressionQuality w 95 writeImage w (Just (decodeString newPath)) return w2 - return [SqlByteString (B.pack newPath), SqlInteger (fromIntegral pWidth), theId] + return [SqlByteString (B.pack $ '/':newPath), SqlInteger (fromIntegral pWidth), theId] _ -> error "malformed entry" ) rows