Commit a21c02a0 authored by Duncan Coutts's avatar Duncan Coutts
Browse files

Fix haddock markup

parent e843ca24
......@@ -496,8 +496,7 @@ nhcProgram :: Program
nhcProgram = (simpleProgram "nhc98") {
programFindVersion = findProgramVersion "--version" $ \str ->
-- Invoking "nhc98 --version" gives a string like
-- /usr/local/bin/nhc98: v1.20 (2007-11-22)
-- [ config: ix86-Linux/ghc by user@host on Fri Nov 23 14:11:17 GMT 2007 ]
-- "/usr/local/bin/nhc98: v1.20 (2007-11-22)"
case words str of
(_:('v':ver):_) -> ver
_ -> ""
......
Markdown is supported
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