split into library + executables

1 files changed, 0 insertions, 42 deletions

diff --git a/State.hs b/State.hs
deleted file mode 100644
index a291a53..0000000
--- a/State.hs
+++ /dev/null
@@ -1,42 +0,0 @@
-module State where
-
-import Blessings.String (Blessings)
-import qualified Data.Text as T
-import Data.Time
-import qualified Data.Tree.Zipper as Z
-import Scanner
-import System.Posix.Signals
-import TreeView (TreeView)
-
-data State = State
-    { cursor :: Z.TreePos Z.Full TreeView
-    , xoffset :: Int
-    , yoffset :: Int
-    , flashMessage :: Blessings String
-    , screenWidth :: Int
-    , screenHeight :: Int
-    , headBuffer :: [Blessings String]
-    , treeBuffer :: [Blessings String]
-    , now :: UTCTime
-    , signalHandlers :: [(Signal, IO ())]
-    , query :: String
-    , keymap :: String -> State -> IO State
-    , mousemap :: Scan -> State -> IO State
-    , tagSymbols :: [(T.Text, T.Text)]
-    , colorConfig :: ColorConfig
-    }
-
-data ColorConfig = ColorConfig
-    { alt :: Blessings String -> Blessings String
-    , search :: Blessings String -> Blessings String
-    , focus :: Blessings String -> Blessings String
-    , quote :: Blessings String -> Blessings String
-    , boring :: Blessings String -> Blessings String
-    , prefix :: Blessings String -> Blessings String
-    , date :: Blessings String -> Blessings String
-    , tags :: Blessings String -> Blessings String
-    , unreadSearch :: Blessings String -> Blessings String
-    , unreadMessage :: Blessings String -> Blessings String
-    , boringMessage :: Blessings String -> Blessings String
-    , tagMap :: [(T.Text, Blessings String -> Blessings String)]
-    }