diff options
Diffstat (limited to 'src/Rahm/Desktop/TabletMode.hs')
| -rw-r--r-- | src/Rahm/Desktop/TabletMode.hs | 7 |
1 files changed, 6 insertions, 1 deletions
diff --git a/src/Rahm/Desktop/TabletMode.hs b/src/Rahm/Desktop/TabletMode.hs index b13e919..4d03ee5 100644 --- a/src/Rahm/Desktop/TabletMode.hs +++ b/src/Rahm/Desktop/TabletMode.hs @@ -31,6 +31,7 @@ module Rahm.Desktop.TabletMode tabletModeXMobarString, tabletModeCommandHandler, syntheticKeyStartDrag, + syntheticKeyStartResize, ) where @@ -68,6 +69,9 @@ import XMonad.Util.Run (runProcessWithInput) syntheticKeyStartDrag :: KeySym syntheticKeyStartDrag = 0x1100000000000011 +syntheticKeyStartResize :: KeySym +syntheticKeyStartResize = 0x1100000000000111 + -- | Rotation angle for the display data RotationAngle = -- | Normal orientation (0°) @@ -262,7 +266,8 @@ tabletModeXMobarString = do "<fc=#f08080><action=`rdectl shift . _`> ✗ </action></fc>", "<fc=#808080><action=`rofi -monitor -4 -display-run Execute -show run -normal-window`>\61728 </action></fc>", "<fc=#80f080><action=`rdectl next-rotation`> \58183 </action></fc>", - "<fc=#80f080><action=`sleep 0.2 && rdectl keysym " ++ show syntheticKeyStartDrag ++ "`> \983486 </action></fc>" + "<fc=#80f080><action=`sleep 0.2 && rdectl keysym " ++ show syntheticKeyStartDrag ++ "`> \983486 </action></fc>", + "<fc=#80f080><action=`sleep 0.2 && rdectl keysym " ++ show syntheticKeyStartResize ++ "`> \985704 </action></fc>" ] else "<action=`rdectl tablet-mode on`><fc=#66cc66> \61705 </fc></action>" ) |