diff --git a/HAppS-IxSet.cabal b/HAppS-IxSet.cabal
--- a/HAppS-IxSet.cabal
+++ b/HAppS-IxSet.cabal
@@ -1,5 +1,5 @@
 Name:                HAppS-IxSet
-Version:             0.9.2
+Version:             0.9.2.1
 Description:         Web framework
 License:             BSD3
 Copyright:           2007 HAppS LLC
diff --git a/src/HAppS/Data/IxSet.hs b/src/HAppS/Data/IxSet.hs
--- a/src/HAppS/Data/IxSet.hs
+++ b/src/HAppS/Data/IxSet.hs
@@ -1,7 +1,7 @@
 {-# LANGUAGE UndecidableInstances, OverlappingInstances, FlexibleInstances,
              MultiParamTypeClasses, TemplateHaskell, RankNTypes,
              FunctionalDependencies, DeriveDataTypeable,
-             GADTs #-}
+             GADTs, CPP #-}
 
 
 {--
@@ -200,6 +200,7 @@
 
 
 inferIxSet :: String -> TH.Name -> TH.Name -> [TH.Name] -> Q [Dec]
+#ifndef __HADDOCK__
 inferIxSet ixset typeName calName entryPoints
     = do calInfo <- reify calName
          typeInfo <- reify typeName
@@ -228,7 +229,7 @@
                      --d <- return $ deriveDefault' True [aType] ''IxSet
                      --runIO (putStrLn (pprint d))
                      return $ [i, ixType']  -- ++ d
-
+#endif