Hello community,

here is the log from the commit of package perl-Data-Dump-Streamer for 
openSUSE:Factory checked in at 2014-07-20 10:50:07
++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
Comparing /work/SRC/openSUSE:Factory/perl-Data-Dump-Streamer (Old)
 and      /work/SRC/openSUSE:Factory/.perl-Data-Dump-Streamer.new (New)
++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++

Package is "perl-Data-Dump-Streamer"

Changes:
--------
--- 
/work/SRC/openSUSE:Factory/perl-Data-Dump-Streamer/perl-Data-Dump-Streamer.changes
  2014-02-11 10:44:09.000000000 +0100
+++ 
/work/SRC/openSUSE:Factory/.perl-Data-Dump-Streamer.new/perl-Data-Dump-Streamer.changes
     2014-07-20 10:50:08.000000000 +0200
@@ -1,0 +2,6 @@
+Sat Jul 19 18:40:18 UTC 2014 - [email protected]
+
+- updated to 2.38
+  Only github log
+
+-------------------------------------------------------------------

Old:
----
  Data-Dump-Streamer-2.37.tar.gz

New:
----
  Data-Dump-Streamer-2.38.tar.gz

++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++

Other differences:
------------------
++++++ perl-Data-Dump-Streamer.spec ++++++
--- /var/tmp/diff_new_pack.3ENbPi/_old  2014-07-20 10:50:09.000000000 +0200
+++ /var/tmp/diff_new_pack.3ENbPi/_new  2014-07-20 10:50:09.000000000 +0200
@@ -17,10 +17,10 @@
 
 
 Name:           perl-Data-Dump-Streamer
-Version:        2.37
+Version:        2.38
 Release:        0
 %define cpan_name Data-Dump-Streamer
-Summary:        Accurately serialize a data structure as Perl code
+Summary:        Accurately serialize a data structure as Perl code.
 License:        Artistic-1.0 or GPL-1.0+
 Group:          Development/Libraries/Perl
 Url:            http://search.cpan.org/dist/Data-Dump-Streamer/

++++++ Data-Dump-Streamer-2.37.tar.gz -> Data-Dump-Streamer-2.38.tar.gz ++++++
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' old/Data-Dump-Streamer-2.37/META.json 
new/Data-Dump-Streamer-2.38/META.json
--- old/Data-Dump-Streamer-2.37/META.json       2014-01-29 17:17:28.000000000 
+0100
+++ new/Data-Dump-Streamer-2.38/META.json       2014-06-12 12:58:11.000000000 
+0200
@@ -4,7 +4,7 @@
       "Yves Orton <[email protected]>, Joshua ben Jore <[email protected]>"
    ],
    "dynamic_config" : 1,
-   "generated_by" : "Module::Build version 0.38, CPAN::Meta::Converter version 
2.110440",
+   "generated_by" : "Module::Build version 0.38, CPAN::Meta::Converter version 
2.120351",
    "license" : [
       "perl_5"
    ],
@@ -16,68 +16,68 @@
    "prereqs" : {
       "build" : {
          "requires" : {
-            "B::Deparse" : 0,
-            "Carp" : 0,
-            "Config" : 0,
-            "Data::Dumper" : 0,
-            "Devel::Peek" : 0,
-            "ExtUtils::CBuilder" : 0,
-            "Symbol" : 0,
-            "Test::More" : 0,
-            "Text::Abbrev" : 0,
-            "base" : 0,
-            "overload" : 0,
-            "re" : 0,
-            "strict" : 0,
-            "utf8" : 0,
-            "vars" : 0,
-            "warnings" : 0
+            "B::Deparse" : "0",
+            "Carp" : "0",
+            "Config" : "0",
+            "Data::Dumper" : "0",
+            "Devel::Peek" : "0",
+            "ExtUtils::CBuilder" : "0",
+            "Symbol" : "0",
+            "Test::More" : "0",
+            "Text::Abbrev" : "0",
+            "base" : "0",
+            "overload" : "0",
+            "re" : "0",
+            "strict" : "0",
+            "utf8" : "0",
+            "vars" : "0",
+            "warnings" : "0"
          }
       },
       "configure" : {
          "requires" : {
-            "ExtUtils::Depends" : 0,
-            "Module::Build" : 0,
+            "ExtUtils::Depends" : "0",
+            "Module::Build" : "0",
             "perl" : "5.006"
          }
       },
       "runtime" : {
          "recommends" : {
-            "Algorithm::Diff" : 0,
-            "Compress::Zlib" : 0,
-            "JSON::XS" : 0,
-            "MIME::Base64" : 0,
+            "Algorithm::Diff" : "0",
+            "Compress::Zlib" : "0",
+            "JSON::XS" : "0",
+            "MIME::Base64" : "0",
             "PadWalker" : "0.99"
          },
          "requires" : {
-            "B" : 0,
-            "B::Deparse" : 0,
-            "B::Utils" : 0,
-            "Data::Dumper" : 0,
-            "DynaLoader" : 0,
-            "Exporter" : 0,
-            "Hash::Util" : 0,
-            "IO::File" : 0,
-            "Symbol" : 0,
-            "Text::Abbrev" : 0,
-            "Text::Balanced" : 0,
-            "overload" : 0,
-            "re" : 0,
-            "strict" : 0,
-            "vars" : 0,
-            "warnings" : 0,
-            "warnings::register" : 0
+            "B" : "0",
+            "B::Deparse" : "0",
+            "B::Utils" : "0",
+            "Data::Dumper" : "0",
+            "DynaLoader" : "0",
+            "Exporter" : "0",
+            "Hash::Util" : "0",
+            "IO::File" : "0",
+            "Symbol" : "0",
+            "Text::Abbrev" : "0",
+            "Text::Balanced" : "0",
+            "overload" : "0",
+            "re" : "0",
+            "strict" : "0",
+            "vars" : "0",
+            "warnings" : "0",
+            "warnings::register" : "0"
          }
       }
    },
    "provides" : {
       "Data::Dump::Streamer" : {
          "file" : "lib/Data/Dump/Streamer.pm",
-         "version" : "2.37"
+         "version" : "2.38"
       },
       "Data::Dump::Streamer::Deparser" : {
          "file" : "lib/Data/Dump/Streamer.pm",
-         "version" : "2.37"
+         "version" : "2.38"
       }
    },
    "release_status" : "stable",
@@ -89,5 +89,5 @@
          "url" : "https://github.com/demerphq/Data-Dump-Streamer";
       }
    },
-   "version" : "2.37"
+   "version" : "2.38"
 }
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' old/Data-Dump-Streamer-2.37/META.yml 
new/Data-Dump-Streamer-2.38/META.yml
--- old/Data-Dump-Streamer-2.37/META.yml        2014-01-29 17:17:28.000000000 
+0100
+++ new/Data-Dump-Streamer-2.38/META.yml        2014-06-12 12:58:11.000000000 
+0200
@@ -24,7 +24,7 @@
   Module::Build: 0
   perl: 5.006
 dynamic_config: 1
-generated_by: 'Module::Build version 0.38, CPAN::Meta::Converter version 
2.110440'
+generated_by: 'Module::Build version 0.38, CPAN::Meta::Converter version 
2.120351'
 license: perl
 meta-spec:
   url: http://module-build.sourceforge.net/META-spec-v1.4.html
@@ -33,10 +33,10 @@
 provides:
   Data::Dump::Streamer:
     file: lib/Data/Dump/Streamer.pm
-    version: 2.37
+    version: 2.38
   Data::Dump::Streamer::Deparser:
     file: lib/Data/Dump/Streamer.pm
-    version: 2.37
+    version: 2.38
 recommends:
   Algorithm::Diff: 0
   Compress::Zlib: 0
@@ -64,4 +64,4 @@
 resources:
   license: http://dev.perl.org/licenses/
   repository: https://github.com/demerphq/Data-Dump-Streamer
-version: 2.37
+version: 2.38
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' old/Data-Dump-Streamer-2.37/lib/Data/Dump/Streamer.pm 
new/Data-Dump-Streamer-2.38/lib/Data/Dump/Streamer.pm
--- old/Data-Dump-Streamer-2.37/lib/Data/Dump/Streamer.pm       2014-01-29 
17:17:28.000000000 +0100
+++ new/Data-Dump-Streamer-2.38/lib/Data/Dump/Streamer.pm       2014-06-12 
12:58:11.000000000 +0200
@@ -21,6 +21,7 @@
 
 use vars qw(
              $VERSION
+             $XS_VERSION
              $AUTOLOAD
              @ISA
              @EXPORT @EXPORT_OK @EXPORT_FAIL %EXPORT_TAGS
@@ -34,7 +35,8 @@
 BEGIN{ $HasPadWalker=eval "use PadWalker 0.99; 1"; }
 
 BEGIN {
-    $VERSION   ='2.37';
+    $VERSION   ='2.38';
+    $XS_VERSION = $VERSION;
     $VERSION = eval $VERSION; # used for beta stuff.
     @ISA       = qw(Exporter DynaLoader);
     @EXPORT=qw(Dump DumpLex DumpVars);
@@ -122,7 +124,7 @@
     sub alias_to { return shift }
 
     #warn $VERSION;
-    Data::Dump::Streamer->bootstrap();
+    Data::Dump::Streamer->bootstrap($XS_VERSION);
     if ($]>=5.013010) {
         # As I write this, 5.13.10 doesn't exist so I'm guessing that
         # we can begin using the ordinary core function again.
@@ -904,7 +906,7 @@
     unless ($uname) {
         my $name = blessed($_[1])
                   || reftype($_[1])
-                  || (readonly($_[1])  ? "RO" : "VAR");
+                  || ((readonly($_[1]) && (\$_[1] != \undef)) ? "RO" : "VAR");
         unless ($self->{style}{verbose}) {
             my $n=1;
             (my $abr=$name)=~s/(\w)\w*::/$1/g;
@@ -2301,9 +2303,17 @@
         if $is_ref;
 
     my $glob=globname $item;
-    my $add_do=$self->{style}{purity} && !$ro && $is_ref
-               && {''=>1,SCALAR=>1,REF=>0}->{reftype($_[1])}
-               && !blessed($_[1]) && !$glob;
+    my $add_do=$self->{style}{purity}
+               && !$ro
+               && $is_ref
+               && !blessed($_[1])
+               && !$glob
+               && do {
+                    my $rtype= reftype($_[1]);
+                    $rtype eq "" or
+                    ($rtype eq "SCALAR" and ( $] < 5.020 or !readonly(${ $_[1] 
}) ) )
+                  }
+    ;
 
 
     if ($add_do) {
@@ -3738,7 +3748,8 @@
 our @ISA=qw(B::Deparse);
 my %cache;
 
-our $VERSION = '2.37';
+our $VERSION = '2.38';
+$VERSION= eval $VERSION;
 if ( $VERSION ne $Data::Dump::Streamer::VERSION ) {
     die "Incompatible Data::Dump::Streamer::Deparser v$VERSION vs 
Data::Dump::Streamer v$Data::Dump::Streamer::VERSION";
 }
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' old/Data-Dump-Streamer-2.37/t/madness.t 
new/Data-Dump-Streamer-2.38/t/madness.t
--- old/Data-Dump-Streamer-2.37/t/madness.t     2014-01-29 17:17:28.000000000 
+0100
+++ new/Data-Dump-Streamer-2.38/t/madness.t     2014-06-12 12:58:11.000000000 
+0200
@@ -99,7 +99,7 @@
                              'bar'
                            ],
                   E     => \\1,
-                  F     => \do { my $v = \do { my $v = undef } },
+                  F     => \\undef,
                   G     => $ARRAY2->[0],
                   Q     => [ 'icky' ]
                 }, 'ThisIsATest' );
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' old/Data-Dump-Streamer-2.37/t/madness_json.t 
new/Data-Dump-Streamer-2.38/t/madness_json.t
--- old/Data-Dump-Streamer-2.37/t/madness_json.t        2014-01-29 
17:17:28.000000000 +0100
+++ new/Data-Dump-Streamer-2.38/t/madness_json.t        2014-06-12 
12:58:11.000000000 +0200
@@ -104,7 +104,7 @@
                              'bar'
                            ],
                   E     => \\1,
-                  F     => \do { my $v = \do { my $v = undef } },
+                  F     => \\undef,
                   G     => $ARRAY2->[0],
                   Q     => [ 'icky' ]
                 }, 'ThisIsATest' );
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' old/Data-Dump-Streamer-2.37/t/madness_w.t 
new/Data-Dump-Streamer-2.38/t/madness_w.t
--- old/Data-Dump-Streamer-2.37/t/madness_w.t   2014-01-29 17:17:28.000000000 
+0100
+++ new/Data-Dump-Streamer-2.38/t/madness_w.t   2014-06-12 12:58:11.000000000 
+0200
@@ -108,7 +108,7 @@
                              'bar'
                            ],
                   E     => \\1,
-                  F     => \do { my $v = \do { my $v = undef } },
+                  F     => \\undef,
                   G     => $ARRAY2->[0],
                   Q     => [ 'icky' ]
                 }, 'ThisIsATest' );
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' old/Data-Dump-Streamer-2.37/t/test_helper.pl 
new/Data-Dump-Streamer-2.38/t/test_helper.pl
--- old/Data-Dump-Streamer-2.37/t/test_helper.pl        2014-01-29 
17:17:28.000000000 +0100
+++ new/Data-Dump-Streamer-2.38/t/test_helper.pl        2014-06-12 
12:58:11.000000000 +0200
@@ -183,6 +183,8 @@
         s/\(0x[0-9a-fA-F]+\)/(0xdeadbeef)/g;
         s/\r\n/\n/g;
         s/\s+$//gm;
+        s{\\\\undef}{\\do { my \$v = \\do { my \$v = undef } }}g
+            if $] < 5.020;
         $_.="\n";
 
         #warn "<after>\n$_</after>\n";

-- 
To unsubscribe, e-mail: [email protected]
For additional commands, e-mail: [email protected]

Reply via email to