vty-windows 0.2.0.4 → 0.3.0.0
raw patch · 3 files changed
+15/−2 lines, 3 filesdep ~vty
Dependency ranges changed: vty
Files
CHANGELOG.md view
@@ -43,3 +43,8 @@ 0.2.0.4 ------- * Use readConsoleInput API provided by Win32 library. + +0.3.0.0 +------- +* Added support in `Input.Mouse` for parsing horizontal scrolling inputs + to work with Vty 6.6.
src/Graphics/Vty/Platform/Windows/Input/Mouse.hs view
@@ -86,6 +86,12 @@ scrollDown :: Int scrollDown = 65 +scrollLeft :: Int +scrollLeft = 66 + +scrollRight :: Int +scrollRight = 67 + hasBitSet :: Int -> Int -> Bool hasBitSet val bit = val .&. bit > 0 @@ -110,6 +116,8 @@ , (rightButton, BRight) , (scrollUp, BScrollUp) , (scrollDown, BScrollDown) + , (scrollLeft, BScrollLeft) + , (scrollRight, BScrollRight) ] in case lookup (mods .&. buttonMask) buttonMap of Nothing -> failParse
vty-windows.cabal view
@@ -1,6 +1,6 @@ cabal-version: 3.0 name: vty-windows -version: 0.2.0.4 +version: 0.3.0.0 license: BSD-3-Clause license-file: LICENSE author: Chris hackett @@ -58,7 +58,7 @@ transformers, utf8-string, vector, - vty >= 6.1, + vty >= 6.6, Win32 >= 2.14.2 && < 2.14.3, hs-source-dirs: src default-language: Haskell2010