| | 1481 | # permission granted - need to update commenting cookie |
|---|
| | 1482 | my %cookies = $app->cookies(); |
|---|
| | 1483 | $app->cookie_val(); |
|---|
| | 1484 | my ($x, $y, $remember) = split(/::/, $cookies{$app->user_cookie()}->value); |
|---|
| | 1485 | my $cookie = $cookies{'commenter_id'}; |
|---|
| | 1486 | my $cookie_value = $cookie ? $cookie->value : ''; |
|---|
| | 1487 | my ($id, $blog_ids) = split(':', $cookie_value); |
|---|
| | 1488 | if ( $blog_ids ne 'S' && $blog_ids ne 'N' ) { |
|---|
| | 1489 | $blog_ids .= ",'" . $obj->id . "'"; |
|---|
| | 1490 | } |
|---|
| | 1491 | my $timeout = $remember ? '+10y' : 0; |
|---|
| | 1492 | $timeout = '+' . $app->config->CommentSessionTimeout . 's' unless $timeout; |
|---|
| | 1493 | my %id_kookee = (-name => "commenter_id", |
|---|
| | 1494 | -value => $auth->id . ':' . $blog_ids, |
|---|
| | 1495 | -path => '/', |
|---|
| | 1496 | ($timeout ? (-expires => $timeout) : ())); |
|---|
| | 1497 | $app->bake_cookie(%id_kookee); |
|---|
| | 1498 | |
|---|
