r32393 - in /trunk/libcgi-session-perl: Changes META.yml debian/changelog lib/CGI/Session.pm lib/CGI/Session/Driver/sqlite.pm

gregoa at users.alioth.debian.org gregoa at users.alioth.debian.org
Sun Mar 29 16:15:01 UTC 2009


Author: gregoa
Date: Sun Mar 29 16:14:55 2009
New Revision: 32393

URL: http://svn.debian.org/wsvn/pkg-perl/?sc=1&rev=32393
Log:
New upstream release.

Modified:
    trunk/libcgi-session-perl/Changes
    trunk/libcgi-session-perl/META.yml
    trunk/libcgi-session-perl/debian/changelog
    trunk/libcgi-session-perl/lib/CGI/Session.pm
    trunk/libcgi-session-perl/lib/CGI/Session/Driver/sqlite.pm

Modified: trunk/libcgi-session-perl/Changes
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libcgi-session-perl/Changes?rev=32393&op=diff
==============================================================================
--- trunk/libcgi-session-perl/Changes (original)
+++ trunk/libcgi-session-perl/Changes Sun Mar 29 16:14:55 2009
@@ -1,5 +1,10 @@
 CGI::Session Change Log
 =====================================================================
+
+4.41 - Friday, March 20, 2009
+    * FIX: RT#43290. In CGI::Session::Driver::sqlite, ensure database handle is still defined in DESTROY()
+           before calling ping(). For more detail see RT#35925 as discussed under V 4.31 below.
+    * DOCUMENTATION: Add comments about using the header() method to set the charset to 'utf-8'.
 
 4.40 - Friday, January 2, 2009
     No code changes.
@@ -417,4 +422,4 @@
     * Bug in POD documentation is fixed (thanks to Graham Barr)
 
 
-$Id: Changes 456 2009-01-03 01:16:43Z markstos $
+$Id: Changes 459 2009-03-21 02:00:17Z markstos $

Modified: trunk/libcgi-session-perl/META.yml
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libcgi-session-perl/META.yml?rev=32393&op=diff
==============================================================================
--- trunk/libcgi-session-perl/META.yml (original)
+++ trunk/libcgi-session-perl/META.yml Sun Mar 29 16:14:55 2009
@@ -1,22 +1,15 @@
---- #YAML:1.0
-name:                CGI-Session
-version:             4.40
-abstract:            Persistent session data in CGI applications
-license:             ~
-author:              
-    - Sherzod Ruzmetov <sherzodr at cpan.org>
-generated_by:        ExtUtils::MakeMaker version 6.44
-distribution_type:   module
-requires:     
+# http://module-build.sourceforge.net/META-spec.html
+#XXXXXXX This is a prototype!!!  It will change in the future!!! XXXXX#
+name:         CGI-Session
+version:      4.41
+version_from: lib/CGI/Session.pm
+installdirs:  site
+requires:
     CGI:                           3.26
     Data::Dumper:                  
     Digest::MD5:                   
     Scalar::Util:                  
     Test::More:                    
-meta-spec:
-    url:     http://module-build.sourceforge.net/META-spec-v1.3.html
-    version: 1.3
 
-no_index:
-    package:
-    - CGI::Session::Test::SimpleObjectClass
+distribution_type: module
+generated_by: ExtUtils::MakeMaker version 6.30_01

Modified: trunk/libcgi-session-perl/debian/changelog
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libcgi-session-perl/debian/changelog?rev=32393&op=diff
==============================================================================
--- trunk/libcgi-session-perl/debian/changelog (original)
+++ trunk/libcgi-session-perl/debian/changelog Sun Mar 29 16:14:55 2009
@@ -1,3 +1,9 @@
+libcgi-session-perl (4.41-1) UNRELEASED; urgency=low
+
+  * New upstream release.
+
+ -- gregor herrmann <gregoa at debian.org>  Sun, 29 Mar 2009 18:14:17 +0200
+
 libcgi-session-perl (4.40-1) unstable; urgency=low
 
   * New upstream release.

Modified: trunk/libcgi-session-perl/lib/CGI/Session.pm
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libcgi-session-perl/lib/CGI/Session.pm?rev=32393&op=diff
==============================================================================
--- trunk/libcgi-session-perl/lib/CGI/Session.pm (original)
+++ trunk/libcgi-session-perl/lib/CGI/Session.pm Sun Mar 29 16:14:55 2009
@@ -1,13 +1,13 @@
 package CGI::Session;
 
-# $Id: Session.pm 456 2009-01-03 01:16:43Z markstos $
+# $Id: Session.pm 459 2009-03-21 02:00:17Z markstos $
 
 use strict;
 use Carp;
 use CGI::Session::ErrorHandler;
 
 @CGI::Session::ISA      = qw( CGI::Session::ErrorHandler );
-$CGI::Session::VERSION  = '4.40';
+$CGI::Session::VERSION  = '4.41';
 $CGI::Session::NAME     = 'CGISESSID';
 $CGI::Session::IP_MATCH = 0;
 
@@ -455,7 +455,7 @@
     return 1;
 }
 
-# $Id: Session.pm 456 2009-01-03 01:16:43Z markstos $
+# $Id: Session.pm 459 2009-03-21 02:00:17Z markstos $
 
 =pod
 
@@ -1190,10 +1190,11 @@
 
 =head2 header()
 
-Replacement for L<CGI.pm|CGI>'s header() method. Without this method, you usually need to create a CGI::Cookie object and send it as part of the HTTP header:
+A wrapper for L<CGI.pm|CGI>'s header() method. Calling this method
+is equivalent to something like this:
 
     $cookie = CGI::Cookie->new(-name=>$session->name, -value=>$session->id);
-    print $cgi->header(-cookie=>$cookie);
+    print $cgi->header(-cookie=>$cookie, @_);
 
 You can minimize the above into:
 
@@ -1202,9 +1203,10 @@
 It will retrieve the name of the session cookie from C<$session->name()> which defaults to C<$CGI::Session::NAME>. If you want to use a different name for your session cookie, do something like following before creating session object:
 
     CGI::Session->name("MY_SID");
-    $session = new CGI::Session(undef, $cgi, \%attrs);
-
-Now, $session->header() uses "MY_SID" as a name for the session cookie.
+    $session = CGI::Session->new(undef, $cgi, \%attrs);
+
+Now, $session->header() uses "MY_SID" as a name for the session cookie. For all additional options that can
+be passed, see the C<header()> docs in L<CGI>. 
 
 =head2 query()
 
@@ -1346,6 +1348,13 @@
 
 For details, see: http://rt.cpan.org/Public/Bug/Display.html?id=28516 (and ...id=21981).
 
+Lastly, note that parameters such as 'utf-8' can be passed to the C<header()> method
+when C<header()> is used to send a cookie. E.g.:
+
+	print $session->header(charset => 'utf-8');
+
+See L</header()> for a fuller discussion of the use of the C<header()> method in conjunction with cookies.
+
 =head1 TRANSLATIONS
 
 This document is also available in Japanese.

Modified: trunk/libcgi-session-perl/lib/CGI/Session/Driver/sqlite.pm
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libcgi-session-perl/lib/CGI/Session/Driver/sqlite.pm?rev=32393&op=diff
==============================================================================
--- trunk/libcgi-session-perl/lib/CGI/Session/Driver/sqlite.pm (original)
+++ trunk/libcgi-session-perl/lib/CGI/Session/Driver/sqlite.pm Sun Mar 29 16:14:55 2009
@@ -1,6 +1,6 @@
 package CGI::Session::Driver::sqlite;
 
-# $Id: sqlite.pm 447 2008-11-01 03:46:08Z markstos $
+# $Id: sqlite.pm 459 2009-03-21 02:00:17Z markstos $
 
 use strict;
 
@@ -9,7 +9,7 @@
 use DBI qw(SQL_BLOB);
 use Fcntl;
 
-$CGI::Session::Driver::sqlite::VERSION    = '4.38';
+$CGI::Session::Driver::sqlite::VERSION    = '4.41';
 
 sub init {
     my $self = shift;
@@ -50,7 +50,7 @@
 sub DESTROY {
     my $self = shift;
 
-    unless ( $self->{Handle} -> ping ) {
+    unless ( defined( $self->{Handle} ) && $self->{Handle} -> ping ) {
         $self->set_error(__PACKAGE__ . '::DESTROY(). Database handle has gone away');
         return;
 	}




More information about the Pkg-perl-cvs-commits mailing list