Mercurial > openid
diff src/ur/openidUser.ur @ 45:c39c3f63854a
Don't redirect back to URLs that have query strings
author | Adam Chlipala <adam@chlipala.net> |
---|---|
date | Sun, 03 Jul 2011 16:40:55 -0400 |
parents | f6b3fbf10dac |
children | 72e942423f26 |
line wrap: on
line diff
--- a/src/ur/openidUser.ur Sun Jul 03 14:09:03 2011 -0400 +++ b/src/ur/openidUser.ur Sun Jul 03 16:40:55 2011 -0400 @@ -84,7 +84,11 @@ if b then return M.afterLogout else - currentUrl + b <- currentUrlHasQueryString; + if b then + return M.afterLogout + else + currentUrl val current = login <- getCookie auth;