ilyakooo0/vty
1
0
Fork 0
mirror of https://github.com/ilyakooo0/vty.git synced 2024-11-30 02:13:36 +03:00
Code Issues Projects Releases Wiki Activity

commentary updates

Browse Source
This commit is contained in:
Corey O'Connor 2014-04-15 12:07:00 -07:00
parent e78f057378
commit 0130279971
2 changed files with 4 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

5
src/Graphics/Vty/Input/Internal.hs
View File

@ -4,6 +4,9 @@
-- | The input layer used to be a single function that correctly accounted for the non-threaded -- | The input layer used to be a single function that correctly accounted for the non-threaded
-- runtime by emulating the terminal VMIN adn VTIME handling. This has been removed and replace with -- runtime by emulating the terminal VMIN adn VTIME handling. This has been removed and replace with
-- a more straightforward parser. The non-threaded runtime is no longer supported. -- a more straightforward parser. The non-threaded runtime is no longer supported.
--
-- This is an example of an algorithm where code coverage could be high, even 100%, but the
-- behavior is still under tested. I should collect more of these examples...
module Graphics.Vty.Input.Internal where module Graphics.Vty.Input.Internal where
import Graphics.Vty.Input.Events import Graphics.Vty.Input.Events
@ -222,8 +225,6 @@ attributeControl fd = do
unsetAttrs = setTerminalAttributes fd original Immediately unsetAttrs = setTerminalAttributes fd original Immediately
return (setAttrs,unsetAttrs) return (setAttrs,unsetAttrs)
-- This is an example of an algorithm where code coverage could be high, even 100%, but the
-- algorithm still under tested. I should collect more of these examples...
initInputForFd :: Config -> ClassifyTable -> Fd -> IO Input initInputForFd :: Config -> ClassifyTable -> Fd -> IO Input
initInputForFd config classifyTable inFd = do initInputForFd config classifyTable inFd = do
applyTimingConfig inFd config applyTimingConfig inFd config

2
src/Graphics/Vty/Input/Terminfo.hs
View File

@ -40,7 +40,7 @@ classifyTableForTerm termName term =
: universalTable : universalTable
: termSpecificTables termName : termSpecificTables termName
-- | The user can specify a list of classify table entries in $HOME/.config/vty/input.conf and -- | The user can specify a list of classify table entries in $HOME/.config/vty.conf and
-- $VTY_INPUT_CONFIG. The file at $VTY_INPUT_CONFIG takes precedence over the input.conf file. Both -- $VTY_INPUT_CONFIG. The file at $VTY_INPUT_CONFIG takes precedence over the input.conf file. Both
-- take precedence over the classify tables determined by 'classifyTableForTerm' -- take precedence over the classify tables determined by 'classifyTableForTerm'
-- --