authenticate 0.7.2 → 0.7.2.1

raw patch · 2 files changed

+33/−2 lines, 2 filesPVP: minor bump suggested

API additions: PVP suggests at least a minor version bump

API changes (from Hackage documentation)

Files

• Web/Authenticate/OpenId/Providers.hs +32/−1
• authenticate.cabal +1/−1

@@ -1,13 +1,44 @@+-- | OpenIDs for a number of common OPs. When a function takes a 'String'+-- parameter, that 'String' is the username. module Web.Authenticate.OpenId.Providers-    where+    ( google+    , yahoo+    , livejournal+    , myspace+    , wordpress+    , blogger+    , verisign+    , typepad+    , myopenid+    , claimid+    ) where +google :: String google = "https://www.google.com/accounts/o8/id"++yahoo :: String yahoo = "http://me.yahoo.com/"++livejournal :: String -> String livejournal u = concat ["http://", u, ".livejournal.com/"]++myspace :: String -> String myspace = (++) "http://myspace.com/"++wordpress :: String -> String wordpress u = concat ["http://", u, ".wordpress.com/"]++blogger :: String -> String blogger u = concat ["http://", u, ".blogger.com/"]++verisign :: String -> String verisign u = concat ["http://", u, ".pip.verisignlabs.com/"]++typepad :: String -> String typepad u = concat ["http://", u, ".typepad.com/"]++myopenid :: String -> String myopenid u = concat ["http://", u, ".myopenid.com/"]++claimid :: String -> String claimid = (++) "http://claimid.com/"

@@ -1,5 +1,5 @@ name:            authenticate-version:         0.7.2+version:         0.7.2.1 license:         BSD3 license-file:    LICENSE author:          Michael Snoyman <michael@snoyman.com>