@@ -13,8 +13,6 @@ module Terminal.Args
1313 where
1414
1515
16−import Control.Monad (filterM, when)
17−import qualified Data.Char as Char
1816import qualified Data.List as List
1917import qualified Data.Maybe as Maybe
2018import qualified System.Directory as Dir
@@ -99,8 +97,8 @@ complex intro outro interfaces =
9997
10098
10199maybeAutoComplete :: [String] -> (Int -> [String] -> IO [String]) -> IO ()
102−maybeAutoComplete args getSuggestions =
103− if length args /= 3 then
100+maybeAutoComplete argStrings getSuggestions =
101+ if length argStrings /= 3 then
104102 return ()
105103 else
106104 do maybeLine <- Env.lookupEnv "COMP_LINE"