1 files changed, 3 insertions, 3 deletions
diff --git a/haddock-api/src/Haddock/Backends/Xhtml/Specialize.hs b/haddock-api/src/Haddock/Backends/Xhtml/Specialize.hs
index a0d64c0f..e8e80da1 100644
--- a/haddock-api/src/Haddock/Backends/Xhtml/Specialize.hs
+++ b/haddock-api/src/Haddock/Backends/Xhtml/Specialize.hs
@@ -11,11 +11,11 @@ import GHC
 import Data.Data
 
 
-specialize :: (Eq name, Data (HsType name))
-           => name -> HsType name -> HsType name -> HsType name
+specialize :: (Eq name, Typeable name)
+           => Data a
+           => name -> HsType name -> a -> a
 specialize name details = everywhere (mkT $ specialize' name details)
 
 specialize' :: Eq name => name -> HsType name -> HsType name -> HsType name
 specialize' name details (HsTyVar name') | name == name' = details
 specialize' _ _ typ = typ
- 
-\ No newline at end of file