Skip to content

Commit

Permalink
Revert the change about the --internal flag and a warning about haddock
Browse files Browse the repository at this point in the history
Just a bit of confusion over the behaviour of the --executable flag.
  • Loading branch information
dcoutts committed May 1, 2008
1 parent a1eefe1 commit cfde858
Showing 1 changed file with 2 additions and 3 deletions.
5 changes: 2 additions & 3 deletions Distribution/Simple/Haddock.hs
Expand Up @@ -104,12 +104,11 @@ import Distribution.Version
haddock :: PackageDescription -> LocalBuildInfo -> [PPSuffixHandler] -> HaddockFlags -> IO ()
haddock pkg_descr _ _ haddockFlags
| not (hasLibs pkg_descr)
&& not (fromFlag $ haddockExecutables haddockFlags)
&& not (fromFlag $ haddockInternal haddockFlags) =
&& not (fromFlag $ haddockExecutables haddockFlags) =
warn (fromFlag $ haddockVerbosity haddockFlags) $
"No documentation was generated as this package does not contain "
++ "a library. Perhaps you want to use the haddock command with the "
++ "--executables or --internal flag."
++ "--executables."

haddock pkg_descr lbi suffixes flags = do
let doExes = fromFlag (haddockExecutables flags)
Expand Down

0 comments on commit cfde858

Please sign in to comment.