From: Ian Jackson Date: Fri, 11 Jan 2013 16:14:04 +0000 (+0000) Subject: wip X-Git-Url: http://www.chiark.greenend.org.uk/ucgi/~ian/git?p=cgi-auth-flexible.git;a=commitdiff_plain;h=589da9ecc81d68dd4c78ff4c29c291e894f2b460;ds=sidebyside wip --- diff --git a/cgi-auth-flexible.pm b/cgi-auth-flexible.pm index 0ea969d..7f2f979 100644 --- a/cgi-auth-flexible.pm +++ b/cgi-auth-flexible.pm @@ -588,8 +588,10 @@ sub _check_divert_core ($) { } die unless $cookt eq 'y'; - die unless $parmt eq 'y'; - die unless $cookh eq $parmh; + unless ($r->{S}{promise_check_mutate} && $meth eq 'GET') { + die unless $parmt eq 'y'; + die unless $cookh eq $parmh; + } $r->{AssocSecret} = $cooks; $r->{UserOK} = $cooku; print STDERR "C-D-C OK\n";