diff options
author | jao <jao@gnu.org> | 2022-09-12 02:36:42 +0100 |
---|---|---|
committer | jao <jao@gnu.org> | 2022-09-12 02:36:42 +0100 |
commit | eaf2be9bbcf1b0597a52b14d28e0252ec4714bee (patch) | |
tree | f638f5c7fdd177fef94d34ee961a6797f035e15b /src/Xmobar/X11/Types.hs | |
parent | 7e72fe0bc695b1d69ea58d2f28c014aaae6ee613 (diff) | |
download | xmobar-eaf2be9bbcf1b0597a52b14d28e0252ec4714bee.tar.gz xmobar-eaf2be9bbcf1b0597a52b14d28e0252ec4714bee.tar.bz2 |
wee refactoring: a couple type synonyms
Diffstat (limited to 'src/Xmobar/X11/Types.hs')
-rw-r--r-- | src/Xmobar/X11/Types.hs | 7 |
1 files changed, 5 insertions, 2 deletions
diff --git a/src/Xmobar/X11/Types.hs b/src/Xmobar/X11/Types.hs index e94967b..918f4d2 100644 --- a/src/Xmobar/X11/Types.hs +++ b/src/Xmobar/X11/Types.hs @@ -15,15 +15,16 @@ ------------------------------------------------------------------------------ -module Xmobar.X11.Types (X, XConf (..), Bitmap (..), XFont (..)) where +module Xmobar.X11.Types where import Graphics.X11.Xlib import Control.Monad.Reader import qualified Data.List.NonEmpty as NE +import Xmobar.Config.Types +import Xmobar.Run.Actions (Action) import Xmobar.X11.Bitmap import Xmobar.X11.Text -import Xmobar.Config.Types -- | The X type is a ReaderT type X = ReaderT XConf IO @@ -38,3 +39,5 @@ data XConf = , iconCache :: BitmapCache , config :: Config } + +type ActionPos = ([Action], Position, Position) |