diff --git a/hadrian/src/Rules/BinaryDist.hs b/hadrian/src/Rules/BinaryDist.hs
index 50654f423dfe27ef93faf357183c58ea531a2317..eebe6e93556150623252e83564b7a2775b69f699 100644
--- a/hadrian/src/Rules/BinaryDist.hs
+++ b/hadrian/src/Rules/BinaryDist.hs
@@ -39,11 +39,6 @@ It does so by following the steps below.
   to
     <build root>/bindist/ghc-<X>.<Y>.<Z>-<arch>-<os>/docs/
 
-- copy haddock (built by our stage2 compiler):
-    <build root>/stage2/bin/haddock
-  to
-    <build root>/bindist/ghc-<X>.<Y>.<Z>-<arch>-<os>/bin/haddock
-
 - use autoreconf to generate a `configure` script from
   aclocal.m4 and distrib/configure.ac, that we move to:
     <build root>/bindist/ghc-<X>.<Y>.<Z>-<arch>-<os>/configure
@@ -146,12 +141,6 @@ bindistRules = do
           -- shipping it
           removeFile (bindistFilesDir -/- mingwStamp)
 
-        -- We copy the binary (<build root>/stage1/bin/haddock[.exe]) to
-        -- the bindist's bindir (<build root>/bindist/ghc-.../bin/).
-        haddockPath <- programPath (vanillaContext Stage1 haddock)
-        copyFile haddockPath
-                 (bindistFilesDir -/- "bin" -/- takeFileName haddockPath)
-
         -- We then 'need' all the files necessary to configure and install
         -- (as in, './configure [...] && make install') this build on some
         -- other machine.