opentok 0.0.1 → 0.0.2
raw patch · 3 files changed
+19/−4 lines, 3 filesPVP: major bump suggested
API removals or changes: PVP suggests a major version bump
API changes (from Hackage documentation)
- OpenTok.Token: Moderator :: Role
- OpenTok.Token: Publisher :: Role
- OpenTok.Token: Subscriber :: Role
- OpenTok.Token: TokenOptions :: Role -> Maybe UTCTime -> Maybe String -> Maybe [String] -> TokenOptions
- OpenTok.Token: [_connectionData] :: TokenOptions -> Maybe String
- OpenTok.Token: [_expireTime] :: TokenOptions -> Maybe UTCTime
- OpenTok.Token: [_initialLayoutClassList] :: TokenOptions -> Maybe [String]
- OpenTok.Token: [_role] :: TokenOptions -> Role
- OpenTok.Token: cleanTokenOptions :: [(a, Maybe b)] -> [(a, Maybe b)]
- OpenTok.Token: data Role
- OpenTok.Token: data TokenOptions
- OpenTok.Token: encodeToken :: APIKey -> APISecret -> SessionId -> TokenOptions -> IO Token
- OpenTok.Token: formatToken :: String -> String
- OpenTok.Token: generate :: APIKey -> APISecret -> SessionId -> TokenOptions -> IO (Either OTError Token)
- OpenTok.Token: instance GHC.Generics.Generic OpenTok.Token.TokenOptions
- OpenTok.Token: instance GHC.Show.Show OpenTok.Token.Role
- OpenTok.Token: instance GHC.Show.Show OpenTok.Token.TokenOptions
- OpenTok.Token: sanitize :: String -> String
- OpenTok.Token: tokenOpts :: TokenOptions
- OpenTok.Token: validExpireTime :: TokenOptions -> IO Bool
- OpenTok.Token: validSessionId :: SessionId -> APIKey -> Bool
+ OpenTok: data TokenOptions
+ OpenTok: tokenOpts :: TokenOptions
+ OpenTok: type Token = String
Files
- opentok.cabal +3/−3
- src/OpenTok.hs +3/−0
- src/OpenTok/Token.hs +13/−1
opentok.cabal view
@@ -1,5 +1,5 @@ name: opentok-version: 0.0.1+version: 0.0.2 synopsis: An OpenTok SDK for Haskell description: .@@ -17,8 +17,8 @@ library default-language: Haskell2010- exposed-modules: OpenTok, OpenTok.Session, OpenTok.Token, OpenTok.Archive, OpenTok.Types- other-modules: OpenTok.Client, OpenTok.Util+ exposed-modules: OpenTok, OpenTok.Session, OpenTok.Archive, OpenTok.Types+ other-modules: OpenTok.Client, OpenTok.Token, OpenTok.Util hs-source-dirs: src build-depends: base >=4.7 && <5
src/OpenTok.hs view
@@ -5,6 +5,9 @@ , opentok , createSession , generateToken+ , Token+ , TokenOptions+ , tokenOpts , startArchive , stopArchive )
src/OpenTok/Token.hs view
@@ -45,7 +45,19 @@ _initialLayoutClassList :: Maybe [String] } deriving (Show, Generic) --- | Default token options+{-|+Default Token options++@+TokenOptions+ { _role = Publisher+ , _expireTime = Nothing+ , _connectionData = Nothing+ , _initialLayoutClassList = Nothing+}+@++-} tokenOpts :: TokenOptions tokenOpts = TokenOptions { _role = Publisher