Commit a4932bcb authored by sewardj's avatar sewardj
Browse files

[project @ 2001-03-14 17:53:04 by sewardj]

Don't try and do `take' of a negative number in compMsg.  The Golden
Lemon award for 2001 goes to <name_deleted_to_protect_the_guilty_party>.
parent 1627a008
......@@ -174,7 +174,7 @@ hscNoRecomp ghci_mode dflags mod location (Just old_iface) hst hit pcs_ch
}}}
compMsg mod location =
mod_str ++ take (12 - length mod_str) (repeat ' ')
mod_str ++ take (max 0 (16 - length mod_str)) (repeat ' ')
++ " (" ++ unJust "hscRecomp" (ml_hs_file location) ++ ")"
where mod_str = moduleUserString mod
......
Supports Markdown
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment