From 07f7954cc6c0263cc736a9da58c67216fd83d531 Mon Sep 17 00:00:00 2001 From: Philip Patsch Date: Wed, 3 Feb 2021 13:00:01 +0100 Subject: [PATCH] chore(servant-foreign): remove dead type `Frag` It is not used anywhere and also not exported. --- servant-foreign/src/Servant/Foreign/Internal.hs | 5 ----- 1 file changed, 5 deletions(-) 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