packages feed

t3-server 0.1.0 → 0.1.1

raw patch · 2 files changed

+3/−3 lines, 2 filesPVP ok

version bump matches the API change (PVP)

API changes (from Hackage documentation)

Files

src/T3/Web.hs view
@@ -121,7 +121,7 @@   let name@(UserName un) = rreqName rreq   srv <- server   if T.null un-    then return Nothing+    then badRequest     else do       userKey <- liftIO genUserKey       mUsers <- liftIO . atomically $ do@@ -131,7 +131,7 @@           then return Nothing           else writeTVar (srvUsers srv) users' >> return (Just users')       case mUsers of-        Nothing -> return Nothing+        Nothing -> badRequest         Just users -> do           storeUsers users           return . Just $ RegisterResponse (UserCreds name userKey)
t3-server.cabal view
@@ -1,7 +1,7 @@ name:              t3-server synopsis:            tic-tac-toe server description:         Please see README.md-version:           0.1.0+version:           0.1.1 cabal-version:     >= 1.10 build-type:        Simple license: BSD3