{-# LANGUAGE CPP #-}
module Network.HTTP.Link.Compat
    ( Link
    , linkURI
    , parseLinkURI
    , module Network.HTTP.Link
    )
where

import Data.Text (Text)
import Network.HTTP.Link hiding (Link)
import qualified Network.HTTP.Link as HTTP
import Network.URI (URI)

#if MIN_VERSION_http_link_header(1,2,0)
type Link = HTTP.Link URI
#else
type Link = HTTP.Link
#endif

linkURI :: URI -> [(LinkParam, Text)] -> Link
linkURI :: URI -> [(LinkParam, Text)] -> Link
linkURI = URI -> [(LinkParam, Text)] -> Link
forall uri. uri -> [(LinkParam, Text)] -> Link uri
HTTP.Link

parseLinkURI :: Text -> Either String [Link]
parseLinkURI :: Text -> Either String [Link]
parseLinkURI = Text -> Either String [Link]
forall uri. IsURI uri => Text -> Either String [Link uri]
parseLinkHeader'