diff --git a/hledger-ui/Hledger/UI/AccountsScreen.hs b/hledger-ui/Hledger/UI/AccountsScreen.hs
index 736a7efd6..ee883acb6 100644
--- a/hledger-ui/Hledger/UI/AccountsScreen.hs
+++ b/hledger-ui/Hledger/UI/AccountsScreen.hs
@@ -22,7 +22,7 @@ import Data.Monoid
 import qualified Data.Text as T
 import Data.Time.Calendar (Day)
 import qualified Data.Vector as V
-import Graphics.Vty
+import Graphics.Vty (Event(..),Key(..))
 import Lens.Micro.Platform
 import System.Console.ANSI
 import System.FilePath (takeFileName)
diff --git a/hledger-ui/Hledger/UI/ErrorScreen.hs b/hledger-ui/Hledger/UI/ErrorScreen.hs
index 4833dc910..756e5671a 100644
--- a/hledger-ui/Hledger/UI/ErrorScreen.hs
+++ b/hledger-ui/Hledger/UI/ErrorScreen.hs
@@ -13,7 +13,7 @@ import Control.Monad
 import Control.Monad.IO.Class (liftIO)
 import Data.Monoid
 import Data.Time.Calendar (Day)
-import Graphics.Vty hiding (char, string)-- (Event(..))
+import Graphics.Vty (Event(..),Key(..))
 import Text.Parsec
 
 import Hledger.Cli hiding (progname,prognameandversion,green)
diff --git a/hledger-ui/Hledger/UI/RegisterScreen.hs b/hledger-ui/Hledger/UI/RegisterScreen.hs
index 2d293869e..7a329560c 100644
--- a/hledger-ui/Hledger/UI/RegisterScreen.hs
+++ b/hledger-ui/Hledger/UI/RegisterScreen.hs
@@ -18,7 +18,7 @@ import Data.Maybe
 import qualified Data.Text as T
 import Data.Time.Calendar (Day)
 import qualified Data.Vector as V
-import Graphics.Vty
+import Graphics.Vty (Event(..),Key(..))
 import Brick
 import Brick.Widgets.List
 import Brick.Widgets.Edit
diff --git a/hledger-ui/Hledger/UI/TransactionScreen.hs b/hledger-ui/Hledger/UI/TransactionScreen.hs
index 0abf92b4c..65d3e0cf6 100644
--- a/hledger-ui/Hledger/UI/TransactionScreen.hs
+++ b/hledger-ui/Hledger/UI/TransactionScreen.hs
@@ -14,7 +14,7 @@ import Data.List
 import Data.Monoid
 import qualified Data.Text as T
 import Data.Time.Calendar (Day)
-import Graphics.Vty
+import Graphics.Vty (Event(..),Key(..))
 import Brick
 import Brick.Widgets.List (listMoveTo)
 import Brick.Widgets.Border (borderAttr)
diff --git a/hledger-ui/Hledger/UI/UITypes.hs b/hledger-ui/Hledger/UI/UITypes.hs
index 7a0bd850e..add6fba1d 100644
--- a/hledger-ui/Hledger/UI/UITypes.hs
+++ b/hledger-ui/Hledger/UI/UITypes.hs
@@ -40,7 +40,7 @@ module Hledger.UI.UITypes where
 
 import Data.Monoid
 import Data.Time.Calendar (Day)
-import Graphics.Vty
+import Graphics.Vty (Event)
 import Brick
 import Brick.Widgets.List
 import Brick.Widgets.Edit (Editor)
diff --git a/hledger-ui/Hledger/UI/UIUtils.hs b/hledger-ui/Hledger/UI/UIUtils.hs
index f418a3702..065958dcd 100644
--- a/hledger-ui/Hledger/UI/UIUtils.hs
+++ b/hledger-ui/Hledger/UI/UIUtils.hs
@@ -13,7 +13,7 @@ import Brick.Widgets.Dialog
 import Brick.Widgets.Edit
 import Data.List
 import Data.Monoid
-import Graphics.Vty
+import Graphics.Vty (Event(..),Key(..),Color,Attr,currentAttr)
 import Lens.Micro.Platform
 import System.Process
 
diff --git a/hledger-ui/hledger-ui.cabal b/hledger-ui/hledger-ui.cabal
index b186d69d6..40f78392a 100644
--- a/hledger-ui/hledger-ui.cabal
+++ b/hledger-ui/hledger-ui.cabal
@@ -78,7 +78,7 @@ executable hledger-ui
     , text-zipper >= 0.4 && < 0.5
     , transformers
     , vector
-    , vty >= 5.2 && < 5.6
+    , vty >= 5.2 && < 5.8
   if flag(threaded)
     ghc-options: -threaded
   if flag(old-locale)
diff --git a/hledger-ui/package.yaml b/hledger-ui/package.yaml
index 9bf090a59..b94f0ad2a 100644
--- a/hledger-ui/package.yaml
+++ b/hledger-ui/package.yaml
@@ -83,7 +83,7 @@ executables:
       - text-zipper >= 0.4 && < 0.5
       - transformers
       - vector
-      - vty >= 5.2 && < 5.6
+      - vty >= 5.2 && < 5.8
     when:
       - condition: flag(threaded)
         ghc-options: -threaded