diff options
| author | tulthix <tulthix@gmail.com> | 2021-11-02 19:31:18 -0500 |
|---|---|---|
| committer | tulthix <tulthix@gmail.com> | 2021-11-02 19:35:31 -0500 |
| commit | 9d21a7dd818ece5247e2f75f13d588111e334d8c (patch) | |
| tree | 75e11000996f68454f42e545872760b8776968a3 /src/Xmobar/X11/Actions.hs | |
| parent | 8ca3cfced681ae6c069450cc6d0352910433d46b (diff) | |
| download | xmobar-9d21a7dd818ece5247e2f75f13d588111e334d8c.tar.gz xmobar-9d21a7dd818ece5247e2f75f13d588111e334d8c.tar.bz2 | |
hspace feature. Initial intent: make space for a tray
Diffstat (limited to 'src/Xmobar/X11/Actions.hs')
| -rw-r--r-- | src/Xmobar/X11/Actions.hs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/src/Xmobar/X11/Actions.hs b/src/Xmobar/X11/Actions.hs index 03e58ad..87c03ed 100644 --- a/src/Xmobar/X11/Actions.hs +++ b/src/Xmobar/X11/Actions.hs @@ -18,7 +18,7 @@ import Text.Regex (Regex, subRegex, mkRegex, matchRegex) import Graphics.X11.Types (Button) data Action = Spawn [Button] String - deriving (Eq) + deriving (Eq, Show) runAction :: Action -> IO () runAction (Spawn _ s) = void $ system (s ++ "&") |