Do not normalize haddock args

haskell · Jul 31, 2018 · 9537238 · 9537238
1 parent cf2ee7a
commit 9537238
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/Cabal/Distribution/Simple/Program/Builtin.hs b/Cabal/Distribution/Simple/Program/Builtin.hs
@@ -316,7 +316,7 @@ haddockProgram = (simpleProgram "haddock") {
         (_:_:ver:_) -> takeWhile (`elem` ('.':['0'..'9'])) ver
         _           -> "",
 
-    programNormaliseArgs = \_ _ _ -> []
+    programNormaliseArgs = \_ _ args -> args
   }
 
 greencardProgram :: Program