7x31
/
shellcheck
mirror of https://github.com/koalaman/shellcheck.git
1
0
Fork 0
Code Issues Packages Projects Releases Wiki Activity

Fixed off by one preventing printing of last line

This commit is contained in:
Vidar Holen 2012-11-04 19:42:32 -08:00
parent a92598c372
commit e6edffa8d1
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
shpell.hs
View File

@ -38,7 +38,7 @@ doInput filename contents colorFunc = do
if not $ null comments then do if not $ null comments then do
mapM_ (\x -> do mapM_ (\x -> do
let lineNum = shpellLine (head x) let lineNum = shpellLine (head x)
let line = if lineNum < 1 || lineNum >= lineCount let line = if lineNum < 1 || lineNum > lineCount
then "" then ""
else fileLines !! (lineNum - 1) else fileLines !! (lineNum - 1)
putStrLn "" putStrLn ""