Merge pull request #598 from haskell-servant/jkarni/issecure

Add instances for IsSecure
This commit is contained in:
Julian Arni 2016-09-11 12:03:55 -03:00 committed by GitHub
commit 7f208c7f7d
2 changed files with 7 additions and 1 deletions

View file

@ -1,3 +1,7 @@
next
----
* Added Eq, Show, Read, Generic and Ord instances to IsSecure
0.8.1
----

View file

@ -1,10 +1,12 @@
{-# LANGUAGE DeriveDataTypeable #-}
{-# LANGUAGE DeriveGeneric #-}
module Servant.API.IsSecure
( -- $issecure
IsSecure(..)
) where
import Data.Typeable
import GHC.Generics (Generic)
-- | Was this request made over an SSL connection?
--
@ -19,7 +21,7 @@ data IsSecure = Secure -- ^ the connection to the server
-- is secure (HTTPS)
| NotSecure -- ^ the connection to the server
-- is not secure (HTTP)
deriving Typeable
deriving (Eq, Show, Read, Generic, Ord, Typeable)
-- $issecure
--