Make wiki links fit in 80 columns
This commit is contained in:
parent
a7a404a5a8
commit
66b5f13c6f
|
@ -94,7 +94,7 @@ outputWiki errRef = do
|
|||
where
|
||||
showErr (_, code, msg) =
|
||||
putStrLn $ " " ++ wikiLink ++ "SC" ++ show code ++ " -- " ++ shorten msg
|
||||
limit = 40
|
||||
limit = 36
|
||||
shorten msg =
|
||||
if length msg < limit
|
||||
then msg
|
||||
|
|
Loading…
Reference in New Issue