force session flush with safe umask

master
joey 2006-03-12 18:10:43 +00:00
parent 0563a600e9
commit 1c51f7de50
1 changed files with 6 additions and 0 deletions

View File

@ -963,6 +963,12 @@ sub cgi () { #{{{
# Everything below this point needs the user to be signed in.
if ((! $anonok && ! defined $session->param("name")) || $do eq 'signin') {
cgi_signin($q, $session);
# Force session flush with safe umask.
my $oldmask=umask(077);
$session->flush;
umask($oldmask);
return;
}