fix for GHC 8.10.7

This commit is contained in:
Evgeny Poberezkin 2023-12-11 16:14:56 +00:00
parent 6546426ec0
commit 8a66390a78

View File

@ -1994,7 +1994,7 @@ processChatCommand = \case
DeleteRemoteCtrl rc -> withUser_ $ deleteRemoteCtrl rc >> ok_
QuitChat -> liftIO exitSuccess
ShowVersion -> do
let versionInfo = coreVersionInfo $(simplexmqCommitQ)
let versionInfo = coreVersionInfo "" -- $(simplexmqCommitQ)
chatMigrations <- map upMigration <$> withStore' (Migrations.getCurrent . DB.conn)
agentMigrations <- withAgent getAgentMigrations
pure $ CRVersionInfo {versionInfo, chatMigrations, agentMigrations}