Added missing oauthRealm

This commit is contained in:
Michael Snoyman 2012-01-07 20:00:46 +02:00
parent ad12ce63f0
commit 938f70af51

View File

@ -46,6 +46,7 @@ authOAuth name ident reqUrl accUrl authUrl key sec = AuthPlugin name dispatch lo
, oauthSignatureMethod = HMACSHA1
, oauthConsumerKey = fromString key, oauthConsumerSecret = fromString sec
, oauthCallback = Nothing
, oauthRealm = Nothing
}
dispatch "GET" ["forward"] = do
render <- getUrlRender