@@ -1,3 +1,7 @@
1+-- | This module provides parsers for mouse events for both "normal" and
2+-- "extended" modes. This implementation was informed by
3+--
4+-- http://invisible-island.net/xterm/ctlseqs/ctlseqs.html#h2-Mouse-Tracking
15module Graphics.Vty.Input.Mouse
26 ( requestMouseEvents
37 , disableMouseEvents
@@ -14,10 +18,6 @@ import Data.List (isPrefixOf)
1418import Data.Maybe (catMaybes)
1519import Data.Bits ((.&.))
1620
17−-- This implementation was informed by
18−--
19−-- http://invisible-island.net/xterm/ctlseqs/ctlseqs.html#h2-Mouse-Tracking
20−
2121-- A mouse event in SGR extended mode is
2222--
2323-- '\ESC' '[' '<' B ';' X ';' Y ';' ('M'|'m')