@@ -38,7 +38,7 @@ import Data.Typeable as Typeable
3838import Data.UUID
3939import qualified Data.UUID.V4 as UUID4
4040#if MIN_VERSION_bloodhound(0,17,0)
41−import qualified Database.Bloodhound as V5
41+import qualified Database.Bloodhound as V5
4242#else
4343import qualified Database.V1.Bloodhound as V1
4444import qualified Database.V5.Bloodhound as V5
@@ -547,16 +547,20 @@ instance ESVersion ESV5 where
547547 type IndexName ESV5 = V5.IndexName
548548 toIndexName _ = V5.IndexName
549549 fromIndexName _ (V5.IndexName x) = x
550+#if !MIN_VERSION_bloodhound(0,17,0)
550551 type MappingName ESV5 = V5.MappingName
551552 fromMappingName _ (V5.MappingName x) = x
553+#endif
552554 type DocId ESV5 = V5.DocId
553555 toDocId _ = V5.DocId
554556 type BH ESV5 = V5.BH
555557 runBH _ = V5.runBH
556558 type TemplateName ESV5 = V5.TemplateName
557559 toTemplateName _ = V5.TemplateName
560+#if !MIN_VERSION_bloodhound(0,17,0)
558561 type TemplatePattern ESV5 = V5.TemplatePattern
559562 toTemplatePattern _ = V5.TemplatePattern
563+#endif
560564 type IndexTemplate ESV5 = V5.IndexTemplate
561565 toIndexTemplate _ = V5.IndexTemplate
562566 type IndexDocumentSettings ESV5 = V5.IndexDocumentSettings