[Cpan-forum-commit] rev 183 - in trunk: . lib/CPAN

[svn at pti.co.il]

Author: gabor
Date: 2006-08-29 15:14:49 +0300 (Tue, 29 Aug 2006)
New Revision: 183

Modified:
   trunk/
   trunk/lib/CPAN/Forum.pm
Log:
change cookie expiration to 14 days



Property changes on: trunk
___________________________________________________________________
Name: svk:merge
   - 8c4c90e1-83eb-0310-96eb-e7cb62807872:/local/cpan-forum:11033
   + 8c4c90e1-83eb-0310-96eb-e7cb62807872:/local/cpan-forum:11035

Modified: trunk/lib/CPAN/Forum.pm
===================================================================
--- trunk/lib/CPAN/Forum.pm	2006-08-27 20:18:51 UTC (rev 182)
+++ trunk/lib/CPAN/Forum.pm	2006-08-29 12:14:49 UTC (rev 183)
@@ -16,6 +16,7 @@
 use List::MoreUtils qw(any);
 
 use CPAN::Forum::INC;
+use CPAN::Forum::DBI;
 
 my $cookiename  = "cpanforum";
 my $SUBJECT = qr{[\w .:~!@#\$%^&*\()+?><,'";=-]+};
@@ -406,7 +407,6 @@
     my $self = shift;
     
     my $db_connect = $self->param("DB_CONNECT");
-    use CPAN::Forum::DBI;
     CPAN::Forum::DBI->myinit($db_connect);
     my $dbh = CPAN::Forum::DBI::db_Main();
     
@@ -438,7 +438,7 @@
         #CGI_SESSION_OPTIONS => [ "driver:File", $self->query, {Directory => "/tmp"}],
         #CGI_SESSION_OPTIONS => [ "driver:SQLite", $self->query, {Handle => $dbh}],
         COOKIE_PARAMS       => {
-                -expires => '+24h',
+                -expires => '+14d',
                 -path    => '/',
         },
         SEND_COOKIE         => 0,
@@ -447,9 +447,6 @@
     $self->log->debug("sid:  " . ($self->session->id() || ""));
     
     $self->header_props(
-        #-expires => '-1d',  
-        # I think this this -expires causes some strange behaviour in IE 
-        # on the other hand it is needed in Opera to make sure it won't cache pages.
         -charset => "utf-8",
     );
 }