diff --git a/src/Quasar/Wayland/Protocol/TH.hs b/src/Quasar/Wayland/Protocol/TH.hs
index c735dabc761c913f8a847d9feebc46445467ed0d..ab7ad8e45a7c079ef07f9ce81788310403a86f55 100644
--- a/src/Quasar/Wayland/Protocol/TH.hs
+++ b/src/Quasar/Wayland/Protocol/TH.hs
@@ -53,9 +53,6 @@ generateWaylandProcol protocolFile = do
   addDependentFile protocolFile
   xml <- liftIO (BS.readFile protocolFile)
   protocol <- parseProtocol xml
-
-  traceIO $ show $ interfaces protocol
-
   concat <$> mapM interfaceDec protocol.interfaces