packages feed

vty 5.2.1 → 5.2.2

raw patch · 18 files changed

+19/−73 lines, 18 files

Files

CHANGELOG view
@@ -1,3 +1,8 @@+5.2.2+  - When looking at input for an event, don't look too deep.+      - https://github.com/coreyoconnor/vty/pull/57+      - Thanks ethercrow!+ 5.2.1   - Bump upper version bound for lens to 4.5. Thanks markus1189! 
README.md view
@@ -43,7 +43,7 @@   ansi. This means that some terminals will not have correct special key support (shifted F10 etc)  * Uses the TIOCGWINSZ ioctl to find the current window size, which-  appears to be limited to Linux and *BSD.+  appears to be limited to Linux and BSD.  # Platform Support @@ -57,6 +57,16 @@ None!  # Development Notes++## Under NixOS++After installing ncurses to user env.++~~~+LIBRARY_PATH=$HOME/.nix-profile/lib/ cabal configure --enable-tests --extra-lib-dirs=$HOME/.nix-profile/lib+LIBRARY_PATH=$HOME/.nix-profile/lib/ cabal build+LIBRARY_PATH=$HOME/.nix-profile/lib/ cabal test+~~~  ## Coverage 
− dist/build/verify-attribute-opsStub/verify-attribute-opsStub-tmp/verify-attribute-opsStub.hs
@@ -1,5 +0,0 @@-module Main ( main ) where-import Distribution.Simple.Test.LibV09 ( stubMain )-import VerifyAttributeOps ( tests )-main :: IO ()-main = stubMain tests
− dist/build/verify-crop-span-generationStub/verify-crop-span-generationStub-tmp/verify-crop-span-generationStub.hs
@@ -1,5 +0,0 @@-module Main ( main ) where-import Distribution.Simple.Test.LibV09 ( stubMain )-import VerifyCropSpanGeneration ( tests )-main :: IO ()-main = stubMain tests
− dist/build/verify-display-attributesStub/verify-display-attributesStub-tmp/verify-display-attributesStub.hs
@@ -1,5 +0,0 @@-module Main ( main ) where-import Distribution.Simple.Test.LibV09 ( stubMain )-import VerifyDisplayAttributes ( tests )-main :: IO ()-main = stubMain tests
− dist/build/verify-empty-image-propsStub/verify-empty-image-propsStub-tmp/verify-empty-image-propsStub.hs
@@ -1,5 +0,0 @@-module Main ( main ) where-import Distribution.Simple.Test.LibV09 ( stubMain )-import VerifyEmptyImageProps ( tests )-main :: IO ()-main = stubMain tests
− dist/build/verify-eval-terminfo-capsStub/verify-eval-terminfo-capsStub-tmp/verify-eval-terminfo-capsStub.hs
@@ -1,5 +0,0 @@-module Main ( main ) where-import Distribution.Simple.Test.LibV09 ( stubMain )-import VerifyEvalTerminfoCaps ( tests )-main :: IO ()-main = stubMain tests
− dist/build/verify-image-opsStub/verify-image-opsStub-tmp/verify-image-opsStub.hs
@@ -1,5 +0,0 @@-module Main ( main ) where-import Distribution.Simple.Test.LibV09 ( stubMain )-import VerifyImageOps ( tests )-main :: IO ()-main = stubMain tests
− dist/build/verify-image-transStub/verify-image-transStub-tmp/verify-image-transStub.hs
@@ -1,5 +0,0 @@-module Main ( main ) where-import Distribution.Simple.Test.LibV09 ( stubMain )-import VerifyImageTrans ( tests )-main :: IO ()-main = stubMain tests
− dist/build/verify-inlineStub/verify-inlineStub-tmp/verify-inlineStub.hs
@@ -1,5 +0,0 @@-module Main ( main ) where-import Distribution.Simple.Test.LibV09 ( stubMain )-import VerifyInline ( tests )-main :: IO ()-main = stubMain tests
− dist/build/verify-layers-span-generationStub/verify-layers-span-generationStub-tmp/verify-layers-span-generationStub.hs
@@ -1,5 +0,0 @@-module Main ( main ) where-import Distribution.Simple.Test.LibV09 ( stubMain )-import VerifyLayersSpanGeneration ( tests )-main :: IO ()-main = stubMain tests
− dist/build/verify-parse-terminfo-capsStub/verify-parse-terminfo-capsStub-tmp/verify-parse-terminfo-capsStub.hs
@@ -1,5 +0,0 @@-module Main ( main ) where-import Distribution.Simple.Test.LibV09 ( stubMain )-import VerifyParseTerminfoCaps ( tests )-main :: IO ()-main = stubMain tests
− dist/build/verify-simple-span-generationStub/verify-simple-span-generationStub-tmp/verify-simple-span-generationStub.hs
@@ -1,5 +0,0 @@-module Main ( main ) where-import Distribution.Simple.Test.LibV09 ( stubMain )-import VerifySimpleSpanGeneration ( tests )-main :: IO ()-main = stubMain tests
− dist/build/verify-terminalStub/verify-terminalStub-tmp/verify-terminalStub.hs
@@ -1,5 +0,0 @@-module Main ( main ) where-import Distribution.Simple.Test.LibV09 ( stubMain )-import VerifyOutput ( tests )-main :: IO ()-main = stubMain tests
− dist/build/verify-using-mock-terminalStub/verify-using-mock-terminalStub-tmp/verify-using-mock-terminalStub.hs
@@ -1,5 +0,0 @@-module Main ( main ) where-import Distribution.Simple.Test.LibV09 ( stubMain )-import VerifyUsingMockTerminal ( tests )-main :: IO ()-main = stubMain tests
− dist/build/verify-utf8-widthStub/verify-utf8-widthStub-tmp/verify-utf8-widthStub.hs
@@ -1,5 +0,0 @@-module Main ( main ) where-import Distribution.Simple.Test.LibV09 ( stubMain )-import VerifyUtf8Width ( tests )-main :: IO ()-main = stubMain tests
src/Graphics/Vty/Input/Classify.hs view
@@ -30,6 +30,7 @@ compile table = cl' where     -- take all prefixes and create a set of these     prefixSet = S.fromList $ concatMap (init . inits . fst) $ table+    maxValidInputLength = maximum (map (length . fst) table)     eventForInput = M.fromList table     cl' [] = Prefix     cl' inputBlock = case M.lookup inputBlock eventForInput of@@ -45,7 +46,7 @@                 -- H: There will always be one match. The prefixSet contains, by definition, all                 -- prefixes of an event.                  False ->-                    let inputPrefixes = reverse $ tail $ inits inputBlock+                    let inputPrefixes = reverse $ take maxValidInputLength $ tail $ inits inputBlock                     in case mapMaybe (\s -> (,) s `fmap` M.lookup s eventForInput) inputPrefixes of                         (s,e) : _ -> Valid e (drop (length s) inputBlock)                         -- neither a prefix or a full event.
vty.cabal view
@@ -1,5 +1,5 @@ name:                vty-version:             5.2.1+version:             5.2.2 license:             BSD3 license-file:        LICENSE author:              AUTHORS