git.iko.soy/vty
on master help sign in
Mouse: fail event parsing when the mouse event header does not match
0508f83Jonathan Daugherty
src/Graphics/Vty/Input/Mouse.hs+1
compare with master
unifiedsplit
@@ -90,6 +90,7 @@ classifyMouseEvent s = runParser s $ do
90 case ty of
90 case ty of
91 '<' -> classifySGRMouseEvent
91 '<' -> classifySGRMouseEvent
92 'M' -> classifyNormalMouseEvent
92 'M' -> classifyNormalMouseEvent
93+ _ -> failParse
93
94
94-- Given a modifer/button value, determine which button was indicated
95-- Given a modifer/button value, determine which button was indicated
95getSGRButton :: Int -> Parser Button
96getSGRButton :: Int -> Parser Button