@@ -20,7 +20,6 @@
2020#include "overlapping-compat.h"
2121module Servant.Docs.Internal where
2222
23−import Debug.Trace
2423import Prelude ()
2524import Prelude.Compat
2625
@@ -118,7 +117,7 @@ instance Semigroup API where
118117
119118instance Monoid API where
120119 API a1 b1 `mappend` API a2 b2 = API (a1 `mappend` a2)
121− (HM.unionWith combineAction b1 (traceShowId b2))
120+ (HM.unionWith combineAction b1 b2)
122121 mempty = API mempty mempty
123122
124123-- | An empty 'API'