Permalink
Browse files

Redirect instantly

  • Loading branch information...
mattgu74 committed May 23, 2011
1 parent e275fa0 commit 85b55ecee9e1d62a6ffeecf0389bd31c6179515e
Showing with 2 additions and 2 deletions.
  1. +2 −2 src/cas.opa
View
@@ -70,11 +70,11 @@ Cas(conf : Cas.config) = {{
Resource.html("CAS module", body)
login() =
- Resource.default_redirection_page(login_url())
+ Resource.redirection_page("",<></>,{success},0,login_url())
logout() =
do UserContext.change(( _ -> { unlogged }), state)
- Resource.default_redirection_page(logout_url())
+ Resource.redirection_page("",<></>,{success},0,logout_url())
ticket(n) =
myParser =

0 comments on commit 85b55ec

Please sign in to comment.