@@ -97,6 +97,8 @@ instance IsString AuthSettings where
9797
9898-- | Extract basic authentication data from usually __Authorization__
9999-- header value. Returns username and password
100+--
101+-- Since 3.0.5
100102extractBasicAuth :: ByteString -> Maybe (ByteString, ByteString)
101103extractBasicAuth bs =
102104 let (x, y) = S.break isSpace bs
@@ -111,6 +113,8 @@ extractBasicAuth bs =
111113
112114-- | Extract bearer authentication data from __Authorization__ header
113115-- value. Returns bearer token
116+--
117+-- Since 3.0.5
114118extractBearerAuth :: ByteString -> Maybe ByteString
115119extractBearerAuth bs =
116120 let (x, y) = S.break isSpace bs