r19158 - in /trunk/libdata-serializer-perl: Build.PL Changes META.yml Makefile.PL README debian/changelog lib/Data/Serializer.pm lib/Data/Serializer/JSON.pm

gregoa at users.alioth.debian.org gregoa at users.alioth.debian.org
Fri Apr 25 21:16:35 UTC 2008


Author: gregoa
Date: Fri Apr 25 21:16:34 2008
New Revision: 19158

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

Modified:
    trunk/libdata-serializer-perl/Build.PL
    trunk/libdata-serializer-perl/Changes
    trunk/libdata-serializer-perl/META.yml
    trunk/libdata-serializer-perl/Makefile.PL
    trunk/libdata-serializer-perl/README
    trunk/libdata-serializer-perl/debian/changelog
    trunk/libdata-serializer-perl/lib/Data/Serializer.pm
    trunk/libdata-serializer-perl/lib/Data/Serializer/JSON.pm

Modified: trunk/libdata-serializer-perl/Build.PL
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libdata-serializer-perl/Build.PL?rev=19158&op=diff
==============================================================================
--- trunk/libdata-serializer-perl/Build.PL (original)
+++ trunk/libdata-serializer-perl/Build.PL Fri Apr 25 21:16:34 2008
@@ -1,10 +1,11 @@
 use Module::Build;
 my $build = Module::Build->new
 (
-	sign	=>	1,
+	#sign	=>	1,
 	module_name => 'Data::Serializer',
 	dist_author => 'Neil Neely (neil at neely.cx)',
 	license  => 'perl',
+	create_makefile_pl => 'passthrough',
 	build_class	=>	'Module::Build',
 	requires => {
 		'Exporter'	=> 0,

Modified: trunk/libdata-serializer-perl/Changes
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libdata-serializer-perl/Changes?rev=19158&op=diff
==============================================================================
--- trunk/libdata-serializer-perl/Changes (original)
+++ trunk/libdata-serializer-perl/Changes Fri Apr 25 21:16:34 2008
@@ -1,4 +1,14 @@
 Revision history for Perl extension Data::Serializer
+
+0.46  Wedn Apr  23 2008
+	- Fixed Module::Build implementation, will now generate proper META.yml file
+
+0.45  Wedn Apr  23 2008
+	- Removed support for Tie::Transient, the module is long gone.  If ever a standard
+	  emerges for tagging data as transient then Data::Serializer will support it.  
+	- Added utf8 call to Data::Serializer::JSON 
+		patch supplied by Makamaka <makamaka at donzoko.net> in response to complex bug discussion 
+		that started under Crypt::CBC http://rt.cpan.org/Public/Bug/Display.html?id=35239 
 
 0.44  Thu Dec  13 2008
 	- Added 'raw' flag to constructor, allows for more convenient

Modified: trunk/libdata-serializer-perl/META.yml
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libdata-serializer-perl/META.yml?rev=19158&op=diff
==============================================================================
--- trunk/libdata-serializer-perl/META.yml (original)
+++ trunk/libdata-serializer-perl/META.yml Fri Apr 25 21:16:34 2008
@@ -1,19 +1,88 @@
---- #YAML:1.0
-name:                Data-Serializer
-version:             0.44
-abstract:            ~
-license:             ~
-generated_by:        ExtUtils::MakeMaker version 6.36
-distribution_type:   module
-requires:     
-    AutoLoader:                    0
-    AutoSplit:                     0
-    Data::Dumper:                  2.08
-    Digest::SHA:                   0
-    Exporter:                      0
-    File::Spec:                    0
-    IO::File:                      0
-    Test::More:                    0
+---
+name: Data-Serializer
+version: 0.46
+author:
+  - Neil Neely (neil at neely.cx)
+abstract: Modules that serialize data structures
+license: perl
+resources:
+  license: http://dev.perl.org/licenses/
+requires:
+  AutoLoader: 0
+  Data::Dumper: 2.08
+  Digest::SHA: 0
+  Exporter: 0
+  IO::File: 0
+build_requires:
+  File::Spec: 0
+  IO::File: 0
+  Test::More: 0
+recommends:
+  Compress::PPMd: 0
+  Compress::Zlib: 0
+  Config::General: 0
+  Crypt::Blowfish: 0
+  Crypt::CBC: 0
+  Data::Denter: 0
+  Data::Taxi: 0
+  FreezeThaw: 0
+  JSON: 0
+  JSON::Syck: 0
+  JSON::XS: 0
+  MIME::Base64: 0
+  PHP::Serialization: 0
+  Storable: 0
+  XML::Dumper: 0
+  XML::Simple: 0
+  YAML: 0
+  YAML::Syck: 0
+provides:
+  Data::Serializer:
+    file: lib/Data/Serializer.pm
+    version: 0.46
+  Data::Serializer::Config::General:
+    file: lib/Data/Serializer/Config/General.pm
+    version: 0.02
+  Data::Serializer::Cookbook:
+    file: lib/Data/Serializer/Cookbook.pm
+    version: 0.04
+  Data::Serializer::Data::Denter:
+    file: lib/Data/Serializer/Data/Denter.pm
+    version: 0.02
+  Data::Serializer::Data::Dumper:
+    file: lib/Data/Serializer/Data/Dumper.pm
+    version: 0.05
+  Data::Serializer::Data::Taxi:
+    file: lib/Data/Serializer/Data/Taxi.pm
+    version: 0.02
+  Data::Serializer::FreezeThaw:
+    file: lib/Data/Serializer/FreezeThaw.pm
+    version: 0.02
+  Data::Serializer::JSON:
+    file: lib/Data/Serializer/JSON.pm
+    version: 0.03
+  Data::Serializer::JSON::Syck:
+    file: lib/Data/Serializer/JSON/Syck.pm
+    version: 0.02
+  Data::Serializer::PHP::Serialization:
+    file: lib/Data/Serializer/PHP/Serialization.pm
+    version: 0.02
+  Data::Serializer::Storable:
+    file: lib/Data/Serializer/Storable.pm
+    version: 0.03
+  Data::Serializer::XML::Dumper:
+    file: lib/Data/Serializer/XML/Dumper.pm
+    version: 0.02
+  Data::Serializer::XML::Simple:
+    file: lib/Data/Serializer/XML/Simple.pm
+    version: 0.02
+  Data::Serializer::YAML:
+    file: lib/Data/Serializer/YAML.pm
+    version: 0.02
+  Data::Serializer::YAML::Syck:
+    file: lib/Data/Serializer/YAML/Syck.pm
+    version: 0.02
+generated_by: Module::Build version 0.2808
 meta-spec:
-    url:     http://module-build.sourceforge.net/META-spec-v1.2.html
-    version: 1.2
+  url: http://module-build.sourceforge.net/META-spec-v1.2.html
+  version: 1.2

Modified: trunk/libdata-serializer-perl/Makefile.PL
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libdata-serializer-perl/Makefile.PL?rev=19158&op=diff
==============================================================================
--- trunk/libdata-serializer-perl/Makefile.PL (original)
+++ trunk/libdata-serializer-perl/Makefile.PL Fri Apr 25 21:16:34 2008
@@ -1,21 +1,31 @@
 # Note: this file was auto-generated by Module::Build::Compat version 0.03
-use ExtUtils::MakeMaker;
-WriteMakefile
-(
-          'NAME' => 'Data::Serializer',
-          'VERSION_FROM' => 'lib/Data/Serializer.pm',
-          'PREREQ_PM' => {
-                           'AutoLoader' => '0',
-                           'AutoSplit' => '0',
-                           'Data::Dumper' => '2.08',
-                           'Digest::SHA' => '0',
-                           'Exporter' => '0',
-                           'File::Spec' => '0',
-                           'IO::File' => '0',
-                           'Test::More' => '0'
-                         },
-          'INSTALLDIRS' => 'site',
-          'EXE_FILES' => [],
-          'PL_FILES' => {}
-        )
-;
+    
+    unless (eval "use Module::Build::Compat 0.02; 1" ) {
+      print "This module requires Module::Build to install itself.\n";
+      
+      require ExtUtils::MakeMaker;
+      my $yn = ExtUtils::MakeMaker::prompt
+	('  Install Module::Build now from CPAN?', 'y');
+      
+      unless ($yn =~ /^y/i) {
+	die " *** Cannot install without Module::Build.  Exiting ...\n";
+      }
+      
+      require Cwd;
+      require File::Spec;
+      require CPAN;
+      
+      # Save this 'cause CPAN will chdir all over the place.
+      my $cwd = Cwd::cwd();
+      
+      CPAN::Shell->install('Module::Build::Compat');
+      CPAN::Shell->expand("Module", "Module::Build::Compat")->uptodate
+	or die "Couldn't install Module::Build, giving up.\n";
+      
+      chdir $cwd or die "Cannot chdir() back to $cwd: $!";
+    }
+    eval "use Module::Build::Compat 0.02; 1" or die $@;
+    
+    Module::Build::Compat->run_build_pl(args => \@ARGV);
+    require Module::Build;
+    Module::Build::Compat->write_makefile(build_class => 'Module::Build');

Modified: trunk/libdata-serializer-perl/README
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libdata-serializer-perl/README?rev=19158&op=diff
==============================================================================
--- trunk/libdata-serializer-perl/README (original)
+++ trunk/libdata-serializer-perl/README Fri Apr 25 21:16:34 2008
@@ -200,21 +200,6 @@
         Reads first line of supplied file or filehandle and returns it
         deserialized.
 
-TRANSIENCE
-    Data::Serializer is aware of Tie::Transient. What this means is that you
-    use Tie::Transient as normal, and when your object is serialized, the
-    transient components will be automatically removed for you.
-
-    Tie::Transient is not on CPAN, and doesn't look like it ever will be.
-    With the advent of attributes from 5.8 this feature should probably be
-    deprecated anyway.
-
-    If you would like to use Tie::Transient you can download it directly
-    from Brian's site here:
-    http://www.maz.org/perl/Tie-Transient-0.05.tar.gz
-
-    With perl attributes in 5.8, this should probably be deprecated.
-
 AUTHOR
     Neil Neely <neil at neely.cx>.
 
@@ -228,8 +213,6 @@
     http://rt.cpan.org/NoAuth/Bugs.html?Dist=Data-Serializer
 
 TODO
-    Phase out support for Tie::Transient
-
     Extend the persistent framework. Perhaps Persistent::Base(3) framework
     would be useful to explore further. Volunteers for putting this together
     would be welcome.
@@ -276,5 +259,4 @@
     Crypt(3)
     MIME::Base64(3)
     IO::File(3)
-    Tie::Transient(3)
-
+

Modified: trunk/libdata-serializer-perl/debian/changelog
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libdata-serializer-perl/debian/changelog?rev=19158&op=diff
==============================================================================
--- trunk/libdata-serializer-perl/debian/changelog (original)
+++ trunk/libdata-serializer-perl/debian/changelog Fri Apr 25 21:16:34 2008
@@ -1,3 +1,9 @@
+libdata-serializer-perl (0.46-1) UNRELEASED; urgency=low
+
+  * New upstream release.
+
+ -- gregor herrmann <gregoa at debian.org>  Fri, 25 Apr 2008 23:13:12 +0200
+
 libdata-serializer-perl (0.44-1) unstable; urgency=low
 
   * New upstream release.

Modified: trunk/libdata-serializer-perl/lib/Data/Serializer.pm
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libdata-serializer-perl/lib/Data/Serializer.pm?rev=19158&op=diff
==============================================================================
--- trunk/libdata-serializer-perl/lib/Data/Serializer.pm (original)
+++ trunk/libdata-serializer-perl/lib/Data/Serializer.pm Fri Apr 25 21:16:34 2008
@@ -19,7 +19,7 @@
 @EXPORT = qw( );
 @EXPORT_OK = qw( );
 
-$VERSION = '0.44';
+$VERSION = '0.46';
 
 # Preloaded methods go here.
 {
@@ -35,7 +35,7 @@
                   compress   => '0',
                   raw        => '0',
                   options    => {},
-                 transient   => '0',
+                 #transient   => '0',
             serializer_token => '1',
                 );
   sub new {
@@ -51,7 +51,11 @@
     $_internal{$dataref->{_key}} = $dataref;
     my $self = \$dataref->{_key};
     bless $self, $class;
-    $self->_transient(1) if (eval "require Tie::Transient");
+    #opting to not even warn on this, I don't think anyone ever used it as it never did get published on CPAN.
+    #If I am wrong and this is in production use, contact me 
+    #if (eval "require Tie::Transient") {
+    #  warn "Support for Tie::Transient is deprecated\n";
+    #}
     
     #load serializer module if it is defined
     return $self;
@@ -121,15 +125,6 @@
     my $return = $_internal{$id}->{encoding};
     if (@_) {
       $_internal{$id}->{encoding} = (shift);
-    }
-    return $return;
-  }
-  sub _transient {
-    my $self = (shift);
-    my $id = $$self;
-    my $return = $_internal{$id}->{transient};
-    if (@_) {
-      $_internal{$id}->{transient} = (shift);
     }
     return $return;
   }
@@ -456,21 +451,6 @@
 
 =back
 
-=head1 TRANSIENCE 
-
-Data::Serializer is aware of Tie::Transient.  What this means is that you use
-Tie::Transient as normal, and when your object is serialized, the transient 
-components will be automatically removed for you.
-
-Tie::Transient is not on CPAN, and doesn't look like it ever will be.  With
-the advent of attributes from 5.8 this feature should probably be deprecated
-anyway.
-
-If you would like to use Tie::Transient you can download it directly 
-from Brian's site here:  http://www.maz.org/perl/Tie-Transient-0.05.tar.gz
-
-With perl attributes in 5.8, this should probably be deprecated.  
-
 =head1 AUTHOR
 
 Neil Neely <F<neil at neely.cx>>.
@@ -486,8 +466,6 @@
 http://rt.cpan.org/NoAuth/Bugs.html?Dist=Data-Serializer
 
 =head1 TODO
-
-Phase out support for Tie::Transient
 
 Extend the persistent framework.  Perhaps  L<Persistent::Base(3)> framework
 would be useful to explore further.  Volunteers for putting this together
@@ -562,8 +540,6 @@
 =item L<MIME::Base64(3)>
 
 =item L<IO::File(3)>
-
-=item L<Tie::Transient(3)>
 
 =back
 
@@ -721,9 +697,7 @@
 
   #define serializer for token
   $serializer = $self->serializer;
-  &Tie::Transient::hide_transients() if ($self->_transient());
   my $value = $self->_serialize(\@_,$serializer);
-  &Tie::Transient::show_transients() if ($self->_transient());
 
   if ($self->compress) {
     $compressor = $self->compressor;
@@ -873,9 +847,7 @@
     $value = $self->_decompress($value);
   }
   #we always deserialize no matter what.
-  &Tie::Transient::show_transients() if ($self->_transient());
   my @return = $self->_deserialize($value,$serializer);
-  &Tie::Transient::hide_transients() if ($self->_transient());
   return wantarray ? @return : $return[0];
 }
 

Modified: trunk/libdata-serializer-perl/lib/Data/Serializer/JSON.pm
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libdata-serializer-perl/lib/Data/Serializer/JSON.pm?rev=19158&op=diff
==============================================================================
--- trunk/libdata-serializer-perl/lib/Data/Serializer/JSON.pm (original)
+++ trunk/libdata-serializer-perl/lib/Data/Serializer/JSON.pm Fri Apr 25 21:16:34 2008
@@ -6,10 +6,10 @@
 use JSON;
 use vars qw($VERSION @ISA);
 
-$VERSION = '0.02';
+$VERSION = '0.03';
 
 sub serialize {
-	return JSON->VERSION < 2 ? JSON->new->objToJson($_[1]) : JSON->new->encode($_[1]);
+	return JSON->VERSION < 2 ? JSON->new->objToJson($_[1]) : JSON->new->utf8->encode($_[1]);
 }
 
 sub deserialize {




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