ui: import Lens.Micro.Platform more correctly

hledger-ui/Hledger/UI/AccountsScreen.hs

@@ -27,7 +27,7 @@ import Brick.Widgets.List
 import Brick.Widgets.Edit
 import Brick.Widgets.Border (borderAttr)
 -- import Brick.Widgets.Center
-import Lens.Micro
+import Lens.Micro.Platform
 
 import Hledger
 import Hledger.Cli hiding (progname,prognameandversion,green)

hledger-ui/Hledger/UI/ErrorScreen.hs

@@ -8,7 +8,7 @@ module Hledger.UI.ErrorScreen
  )
 where
 
--- import Lens.Micro ((^.))
+-- import Lens.Micro.Platform ((^.))
 import Control.Monad.IO.Class (liftIO)
 import Data.Monoid
 -- import Data.Maybe

hledger-ui/Hledger/UI/Main.hs

@@ -10,7 +10,7 @@ Released under GPL version 3 or later.
 module Hledger.UI.Main where
 
 -- import Control.Applicative
--- import Lens.Micro ((^.))
+-- import Lens.Micro.Platform ((^.))
 import Control.Monad
 -- import Control.Monad.IO.Class (liftIO)
 -- import Data.Default

hledger-ui/Hledger/UI/RegisterScreen.hs

@@ -8,7 +8,7 @@ module Hledger.UI.RegisterScreen
  )
 where
 
-import Lens.Micro ((^.))
+import Lens.Micro.Platform ((^.))
 import Control.Monad.IO.Class (liftIO)
 import Data.List
 import Data.List.Split (splitOn)

hledger-ui/Hledger/UI/TransactionScreen.hs

@@ -8,7 +8,7 @@ module Hledger.UI.TransactionScreen
  )
 where
 
--- import Lens.Micro ((^.))
+-- import Lens.Micro.Platform ((^.))
 import Control.Monad.IO.Class (liftIO)
 import Data.List
 -- import Data.List.Split (splitOn)

hledger-ui/Hledger/UI/UITypes.hs

@@ -45,8 +45,7 @@ import Brick
 import Brick.Widgets.List
 import Brick.Widgets.Edit (Editor)
 import qualified Data.Vector as V
-import Lens.Micro
-import Lens.Micro.TH
+import Lens.Micro.Platform
 import Text.Show.Functions ()
   -- import the Show instance for functions. Warning, this also re-exports it
 

hledger-ui/Hledger/UI/UIUtils.hs

@@ -32,7 +32,7 @@ module Hledger.UI.UIUtils
 --  )
   where
 
-import Lens.Micro ((^.))
+import Lens.Micro.Platform ((^.))
 -- import Control.Monad
 -- import Control.Monad.IO.Class
 -- import Data.Default