From https://github.com/supki/xml-html-conduit-lens/pull/9
From: Xavier Dectot <xavier@wheredoibegin.fr>
Date: Tue, 15 Apr 2025 09:35:17 +0200
Subject: [PATCH] compatibility with recent data-default

--- a/src/Text/Xml/Lens.hs
+++ b/src/Text/Xml/Lens.hs
@@ -113,7 +113,7 @@ instance AsXmlDocument TL.Text where
 
 -- | XML document parsing and rendering with the default settings
 _XmlDocument :: AsXmlDocument t => Prism' t Document
-_XmlDocument = _XmlDocumentWith def def
+_XmlDocument = _XmlDocumentWith (const def) (const def)
 {-# INLINE _XmlDocument #-}
 
 -- | HTML document parsing overloading