diff options
author | V3n3RiX <venerix@koprulu.sector> | 2022-07-24 08:52:43 +0100 |
---|---|---|
committer | V3n3RiX <venerix@koprulu.sector> | 2022-07-24 08:52:43 +0100 |
commit | 28267a5e528b273fbd1b0f5f52ecaab4b03016ab (patch) | |
tree | f2c2ddc5cf19fcbc848cc9fe427df5abd8ac0339 /x11-wm/xmonad/files | |
parent | e19b21c73e5feac42ade97baf3eeb45c58a2f234 (diff) |
gentoo auto-resync : 24:07:2022 - 08:52:43
Diffstat (limited to 'x11-wm/xmonad/files')
-rw-r--r-- | x11-wm/xmonad/files/xmonad-0.12-check-repeat.patch | 40 |
1 files changed, 40 insertions, 0 deletions
diff --git a/x11-wm/xmonad/files/xmonad-0.12-check-repeat.patch b/x11-wm/xmonad/files/xmonad-0.12-check-repeat.patch new file mode 100644 index 000000000000..79bd2c2d21fa --- /dev/null +++ b/x11-wm/xmonad/files/xmonad-0.12-check-repeat.patch @@ -0,0 +1,40 @@ +--- xmonad/src/XMonad/Core.hs 2010-09-05 05:11:42.000000000 +0400 ++++ xmonad/src/XMonad/Core.hs 2010-09-18 07:59:14.000000000 +0400 +@@ -65,6 +65,7 @@ + , waitingUnmap :: !(M.Map Window Int) -- ^ the number of expected UnmapEvents + , dragging :: !(Maybe (Position -> Position -> X (), X ())) + , numberlockMask :: !KeyMask -- ^ The numlock modifier ++ , keyPressed :: !KeyCode -- ^ keycode of the key being pressed if any + , extensibleState :: !(M.Map String (Either String StateExtension)) + -- ^ stores custom state information. + -- +--- xmonad/src/XMonad/Main.hs 2010-09-05 05:11:42.000000000 +0400 ++++ xmonad/src/XMonad/Main.hs 2010-09-18 08:03:11.000000000 +0400 +@@ -129,6 +129,7 @@ + , mapped = S.empty + , waitingUnmap = M.empty + , dragging = Nothing ++ , keyPressed = 0 + , extensibleState = extState + } + allocaXEvent $ \e -> +@@ -190,10 +191,15 @@ + -- run window manager command + handle (KeyEvent {ev_event_type = t, ev_state = m, ev_keycode = code}) + | t == keyPress = withDisplay $ \dpy -> do +- s <- io $ keycodeToKeysym dpy code 0 +- mClean <- cleanMask m +- ks <- asks keyActions +- userCodeDef () $ whenJust (M.lookup (mClean, s) ks) id ++ kp <- gets keyPressed ++ if kp /= code then do ++ modify $ \s -> s { keyPressed = code } ++ s <- io $ keycodeToKeysym dpy code 0 ++ mClean <- cleanMask m ++ ks <- asks keyActions ++ userCodeDef () $ whenJust (M.lookup (mClean, s) ks) id ++ else return () ++ | t == keyRelease = modify $ \s -> s { keyPressed = 0 } + + -- manage a new window + handle (MapRequestEvent {ev_window = w}) = withDisplay $ \dpy -> do |