diff options
author | jao <jao@gnu.org> | 2022-09-20 05:41:27 +0100 |
---|---|---|
committer | jao <jao@gnu.org> | 2022-09-20 05:41:27 +0100 |
commit | 4b4c9fe0a8849fad124a2f75e815e648dafd4969 (patch) | |
tree | 69fe7d3f6a5a939c8120c0ff5cd9d71a61da648e /src/Xmobar/X11/Types.hs | |
parent | c7681d79108f6e03f5adc33ebb96f14cf9b83f16 (diff) | |
download | xmobar-4b4c9fe0a8849fad124a2f75e815e648dafd4969.tar.gz xmobar-4b4c9fe0a8849fad124a2f75e815e648dafd4969.tar.bz2 |
new namespace: Xmobar.Draw
Diffstat (limited to 'src/Xmobar/X11/Types.hs')
-rw-r--r-- | src/Xmobar/X11/Types.hs | 18 |
1 files changed, 2 insertions, 16 deletions
diff --git a/src/Xmobar/X11/Types.hs b/src/Xmobar/X11/Types.hs index 309b6bf..e880cc0 100644 --- a/src/Xmobar/X11/Types.hs +++ b/src/Xmobar/X11/Types.hs @@ -23,9 +23,8 @@ import qualified Data.List.NonEmpty as NE import Control.Monad.Reader (ReaderT) import Xmobar.Config.Types -import Xmobar.Run.Actions (Action) -import Xmobar.Run.Parsers (Segment) -import Xmobar.X11.Bitmap (Bitmap, BitmapCache) + +import Xmobar.X11.Bitmap (BitmapCache) import Xmobar.X11.Text (XFont) -- | The X type is a ReaderT @@ -40,16 +39,3 @@ data XConf = , iconCache :: BitmapCache , config :: Config } - -type ActionPos = ([Action], X11.Position, X11.Position) -type Actions = [ActionPos] - -type BitmapDrawer = Double -> Double -> String -> IO () - -data DrawContext = DC { dcBitmapDrawer :: BitmapDrawer - , dcBitmapLookup :: String -> Maybe Bitmap - , dcConfig :: Config - , dcWidth :: Double - , dcHeight :: Double - , dcSegments :: [[Segment]] - } |