7x31/shellcheck
1
0
Fork 0
mirror of https://github.com/koalaman/shellcheck.git synced 2025-08-10 17:25:04 +08:00
Code Issues Packages Projects Releases Wiki Activity

Fixed off by one preventing printing of last line

Browse Source
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
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 ""