diff --git a/src/Graphics/Vty/Input/Internal.hs b/src/Graphics/Vty/Input/Internal.hs
index dc518f4..f9ef802 100644
--- a/src/Graphics/Vty/Input/Internal.hs
+++ b/src/Graphics/Vty/Input/Internal.hs
@@ -4,6 +4,9 @@
 -- | 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
 -- 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
 
 import Graphics.Vty.Input.Events
@@ -222,8 +225,6 @@ attributeControl fd = do
         unsetAttrs = setTerminalAttributes fd original Immediately
     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 inFd = do
     applyTimingConfig inFd config
diff --git a/src/Graphics/Vty/Input/Terminfo.hs b/src/Graphics/Vty/Input/Terminfo.hs
index 394a254..17c30f5 100644
--- a/src/Graphics/Vty/Input/Terminfo.hs
+++ b/src/Graphics/Vty/Input/Terminfo.hs
@@ -40,7 +40,7 @@ classifyTableForTerm termName term =
            : universalTable
            : 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
 -- take precedence over the classify tables determined by 'classifyTableForTerm'
 --