summaryrefslogtreecommitdiffstats
path: root/qooxdoo/source/perl/CGI/Session/Serialize/storable.pm
diff options
context:
space:
mode:
Diffstat (limited to 'qooxdoo/source/perl/CGI/Session/Serialize/storable.pm')
-rw-r--r--qooxdoo/source/perl/CGI/Session/Serialize/storable.pm60
1 files changed, 0 insertions, 60 deletions
diff --git a/qooxdoo/source/perl/CGI/Session/Serialize/storable.pm b/qooxdoo/source/perl/CGI/Session/Serialize/storable.pm
deleted file mode 100644
index 6ac2dae..0000000
--- a/qooxdoo/source/perl/CGI/Session/Serialize/storable.pm
+++ /dev/null
@@ -1,60 +0,0 @@
-package CGI::Session::Serialize::storable;
-
-# $Id: storable.pm 351 2006-11-24 14:16:50Z markstos $
-
-use strict;
-use Storable;
-require CGI::Session::ErrorHandler;
-
-$CGI::Session::Serialize::storable::VERSION = "4.20";
-@CGI::Session::Serialize::ISA = ( "CGI::Session::ErrorHandler" );
-
-=pod
-
-=head1 NAME
-
-CGI::Session::Serialize::storable - Serializer for CGI::Session
-
-=head1 DESCRIPTION
-
-This library can be used by CGI::Session to serialize session data. Uses L<Storable|Storable>.
-
-=head1 METHODS
-
-=over 4
-
-=item freeze($class, \%hash)
-
-Receives two arguments. First is the class name, the second is the data to be serialized.
-Should return serialized string on success, undef on failure. Error message should be set using
-C<set_error()|CGI::Session::ErrorHandler/"set_error()">
-
-=cut
-
-sub freeze {
- my ($self, $data) = @_;
- return Storable::freeze($data);
-}
-
-=item thaw($class, $string)
-
-Receives two arguments. First is the class name, second is the I<frozen> data string. Should return
-thawed data structure on success, undef on failure. Error message should be set
-using C<set_error()|CGI::Session::ErrorHandler/"set_error()">
-
-=back
-
-=cut
-
-sub thaw {
- my ($self, $string) = @_;
- return Storable::thaw($string);
-}
-
-=head1 LICENSING
-
-For support and licensing see L<CGI::Session|CGI::Session>
-
-=cut
-
-1;