diff --git a/haddock-api/src/Haddock/Interface/Create.hs b/haddock-api/src/Haddock/Interface/Create.hs
index c55e902ef778c8bd4b4c0f26aa388f37358fedc2..70676d97141ed77ff7c1a532d5e8600a69b0a9d4 100644
--- a/haddock-api/src/Haddock/Interface/Create.hs
+++ b/haddock-api/src/Haddock/Interface/Create.hs
@@ -119,7 +119,6 @@ createInterface1 flags unit_state mod_sum mod_iface ifaces inst_ifaces (instance
     -- See Note [Exporting built-in items]
     special_exports
       | mdl == gHC_PRIM   = funAvail
-      | mdl == pRELUDE    = funAvail
       | otherwise         = []
     !exportedNames = concatMap availNames
                                (special_exports <> mi_exports mod_iface)
@@ -176,8 +175,6 @@ createInterface1 flags unit_state mod_sum mod_iface ifaces inst_ifaces (instance
   let builtinTys = DsiSectionHeading 1 (WithHsDocIdentifiers (mkGeneratedHsDocString "Builtin syntax") [])
       bonus_ds mods
         | mdl == gHC_PRIM   = [ builtinTys, DsiExports funAvail ] <> mods
-        | mdl == pRELUDE    = let (hs, rest) = splitAt 2 mods
-                              in hs <> [ DsiExports funAvail ] <> rest
         | otherwise         = mods
 
   let