diff --git a/servant-foreign/src/Servant/Foreign/Internal.hs b/servant-foreign/src/Servant/Foreign/Internal.hs
index 5c82c056..1fabfeed 100644
--- a/servant-foreign/src/Servant/Foreign/Internal.hs
+++ b/servant-foreign/src/Servant/Foreign/Internal.hs
@@ -85,11 +85,6 @@ captureArg                 _ = error "captureArg called on non capture"
 
 type Path f = [Segment f]
 
-newtype Frag f = Frag { unFragment :: Arg f }
-  deriving (Data, Eq, Show, Typeable)
-
-makePrisms ''Frag
-
 data ArgType
   = Normal
   | Flag