summaryrefslogtreecommitdiffhomepage
path: root/src/Xmobar/X11/Loop.hs
diff options
context:
space:
mode:
Diffstat (limited to 'src/Xmobar/X11/Loop.hs')
-rw-r--r--src/Xmobar/X11/Loop.hs2
1 files changed, 1 insertions, 1 deletions
diff --git a/src/Xmobar/X11/Loop.hs b/src/Xmobar/X11/Loop.hs
index 4cf4b8f..8b68944 100644
--- a/src/Xmobar/X11/Loop.hs
+++ b/src/Xmobar/X11/Loop.hs
@@ -181,7 +181,7 @@ updateConfigPosition disp cfg =
else (cfg {position = OnScreen (n+1) o}))
o -> return (cfg {position = OnScreen 1 o})
-runActions :: [([Action], Position, Position)] -> Button -> Position -> IO ()
+runActions :: [ActionPos] -> Button -> Position -> IO ()
runActions actions button pos =
mapM_ runAction $
filter (\(Spawn b _) -> button `elem` b) $