diff --git a/src/Simplex/Chat/Mobile.hs b/src/Simplex/Chat/Mobile.hs index d7f2e5a43c..3671844d7f 100644 --- a/src/Simplex/Chat/Mobile.hs +++ b/src/Simplex/Chat/Mobile.hs @@ -118,7 +118,7 @@ cChatMigrateInitKey fp key keepKey conf background ctrl = do setFileSystemEncoding utf8 setForeignEncoding utf8 - dbPath <- peekCAString fp + dbPath <- peekCString fp dbKey <- BA.convert <$> B.packCString key confirm <- peekCAString conf r <-