Deprecate UVerb (the hard version).

Author: fisx

servant/src/Servant/API/UVerb.hs

@@ -96,7 +96,7 @@ instance HasStatus a => HasStatus (Headers ls a) where
 -- | WARNING: UVerb is deprecated.  Please use MultiVerb instead!
 --
 -- A variant of 'Verb' that can have any of a number of response values and status codes.
-data UVerb (method :: StdMethod) (contentTypes :: [Type]) (as :: [Type])
+data UVerb {-# DEPRECATED "Use MultiVerb instead" #-} (method :: StdMethod) (contentTypes :: [Type]) (as :: [Type])
 
 instance {-# OVERLAPPING #-} MimeRender JSON a => MimeRender JSON (WithStatus _status a) where
   mimeRender contentTypeProxy (WithStatus a) = mimeRender contentTypeProxy a