From 6c6222ef853abd1c900239f1f7fd98dc831b2abf Mon Sep 17 00:00:00 2001
From: Simon Michael <simon@joyful.com>
Date: Thu, 9 Jun 2016 12:41:26 -0700
Subject: [PATCH] ui: import Lens.Micro.Platform more correctly

---
 hledger-ui/Hledger/UI/AccountsScreen.hs    | 2 +-
 hledger-ui/Hledger/UI/ErrorScreen.hs       | 2 +-
 hledger-ui/Hledger/UI/Main.hs              | 2 +-
 hledger-ui/Hledger/UI/RegisterScreen.hs    | 2 +-
 hledger-ui/Hledger/UI/TransactionScreen.hs | 2 +-
 hledger-ui/Hledger/UI/UITypes.hs           | 3 +--
 hledger-ui/Hledger/UI/UIUtils.hs           | 2 +-
 7 files changed, 7 insertions(+), 8 deletions(-)

diff --git a/hledger-ui/Hledger/UI/AccountsScreen.hs b/hledger-ui/Hledger/UI/AccountsScreen.hs
index dbb8ce128..1c8b3e626 100644
--- a/hledger-ui/Hledger/UI/AccountsScreen.hs
+++ b/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)
diff --git a/hledger-ui/Hledger/UI/ErrorScreen.hs b/hledger-ui/Hledger/UI/ErrorScreen.hs
index 0d154fa23..ad19386f4 100644
--- a/hledger-ui/Hledger/UI/ErrorScreen.hs
+++ b/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
diff --git a/hledger-ui/Hledger/UI/Main.hs b/hledger-ui/Hledger/UI/Main.hs
index 695daba6e..dc1be8e2c 100644
--- a/hledger-ui/Hledger/UI/Main.hs
+++ b/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
diff --git a/hledger-ui/Hledger/UI/RegisterScreen.hs b/hledger-ui/Hledger/UI/RegisterScreen.hs
index b874f8c60..4d60493b9 100644
--- a/hledger-ui/Hledger/UI/RegisterScreen.hs
+++ b/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)
diff --git a/hledger-ui/Hledger/UI/TransactionScreen.hs b/hledger-ui/Hledger/UI/TransactionScreen.hs
index 30140a280..ce80bd14f 100644
--- a/hledger-ui/Hledger/UI/TransactionScreen.hs
+++ b/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)
diff --git a/hledger-ui/Hledger/UI/UITypes.hs b/hledger-ui/Hledger/UI/UITypes.hs
index 3164293d2..22a900044 100644
--- a/hledger-ui/Hledger/UI/UITypes.hs
+++ b/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
 
diff --git a/hledger-ui/Hledger/UI/UIUtils.hs b/hledger-ui/Hledger/UI/UIUtils.hs
index 18e5f7aa6..4cad58ee3 100644
--- a/hledger-ui/Hledger/UI/UIUtils.hs
+++ b/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