mirror of
https://github.com/joshuaclayton/unused.git
synced 2024-09-11 04:45:28 +03:00
Hide cursor while analysis is being run
This commit is contained in:
parent
4175effffb
commit
88a1be8c32
@ -12,8 +12,9 @@ data SearchRunner = SearchWithProgress | SearchWithoutProgress
|
||||
executeSearch :: SearchRunner -> [String] -> IO [String]
|
||||
executeSearch runner terms = do
|
||||
resetScreen
|
||||
hideCursor
|
||||
printAnalysisHeader terms
|
||||
runSearch runner terms <* resetScreen
|
||||
runSearch runner terms <* resetScreen <* showCursor
|
||||
|
||||
printAnalysisHeader :: [String] -> IO ()
|
||||
printAnalysisHeader terms = do
|
||||
|
Loading…
Reference in New Issue
Block a user