Index: b/Data/XCB/Pretty.hs
===================================================================
--- a/Data/XCB/Pretty.hs
+++ b/Data/XCB/Pretty.hs
@@ -21,6 +21,8 @@ import Text.PrettyPrint.HughesPJ
 import qualified Data.Map as Map
 import Data.Maybe
 
+import Prelude hiding ((<>))
+
 -- |Minimal complete definition:
 --
 -- One of 'pretty' or 'toDoc'.
