on develop help sign in
Qualified imports
b31f862Ali Abrar
src/Data/Text/Zipper.hs+2−2
@@ -12,11 +12,11 @@ Description: A zipper for text documents that allows convenient editing and navi
12{-# LANGUAGE OverloadedStrings #-}
12{-# LANGUAGE OverloadedStrings #-}
13module Data.Text.Zipper where
13module Data.Text.Zipper where
14
14
15−import Data.Char
15+import Data.Char (isSpace)
16import Data.Map (Map)
16import Data.Map (Map)
17import qualified Data.Map as Map
17import qualified Data.Map as Map
18import Data.Maybe (fromMaybe)
18import Data.Maybe (fromMaybe)
19−import Control.Monad.State
19+import Control.Monad.State (evalState, forM, get, put)
20
20
21import Data.Text (Text)
21import Data.Text (Text)
22import qualified Data.Text as T
22import qualified Data.Text as T
src/Reflex/Vty/Widget.hs+1−1
@@ -53,7 +53,7 @@ import Control.Monad.Fix (MonadFix)
53import Control.Monad.Trans (lift)
53import Control.Monad.Trans (lift)
54import Control.Monad.Trans.Reader (ReaderT, runReaderT, asks, ask)
54import Control.Monad.Trans.Reader (ReaderT, runReaderT, asks, ask)
55import Control.Monad.Trans.Writer (WriterT, runWriterT, censor, tell)
55import Control.Monad.Trans.Writer (WriterT, runWriterT, censor, tell)
56−import Data.Default
56+import Data.Default (Default(..))
57import Data.Text (Text)
57import Data.Text (Text)
58import qualified Data.Text as T
58import qualified Data.Text as T
59import qualified Data.Text.Zipper as TZ
59import qualified Data.Text.Zipper as TZ
src/Reflex/Vty/Widget/Input/Text.hs+3−2
@@ -11,12 +11,13 @@ module Reflex.Vty.Widget.Input.Text
11 , def
11 , def
12 ) where
12 ) where
13
13
14−import Control.Monad.Fix
14+import Control.Monad.Fix (MonadFix)
15−import Data.Default
15+import Data.Default (Default(..))
16import Data.Text (Text)
16import Data.Text (Text)
17import Data.Text.Zipper
17import Data.Text.Zipper
18import qualified Graphics.Vty as V
18import qualified Graphics.Vty as V
19import Reflex
19import Reflex
20+
20import Reflex.Vty.Widget
21import Reflex.Vty.Widget
21
22
22-- | Configuration options for a 'textInput'. For more information on
23-- | Configuration options for a 'textInput'. For more information on