twin/xmonad-contrib
1
0
Fork 0
mirror of https://github.com/xmonad/xmonad-contrib.git synced 2025-05-19 03:20:21 -07:00
Code Issues Packages Projects Releases Wiki Activity

Remove unneeded argument

Browse Source
This commit is contained in:
Matus Goljer 2016-10-16 16:36:18 +02:00
parent 1553d81ce7
commit 444986d993
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
XMonad/Actions/Submap.hs
View File

@ -59,7 +59,7 @@ For detailed instructions on editing your key bindings, see
-- corresponding action, or does nothing if the key is not found in -- corresponding action, or does nothing if the key is not found in
-- the map. -- the map.
submap :: M.Map (KeyMask, KeySym) (X ()) -> X () submap :: M.Map (KeyMask, KeySym) (X ()) -> X ()
submap keys = submapDefault (return ()) keys submap = submapDefault (return ())
-- | Like 'submap', but executes a default action if the key did not match. -- | Like 'submap', but executes a default action if the key did not match.
submapDefault :: X () -> M.Map (KeyMask, KeySym) (X ()) -> X () submapDefault :: X () -> M.Map (KeyMask, KeySym) (X ()) -> X ()