r68083 - in /branches/upstream/libdata-dump-streamer-perl/current: Changes META.yml lib/Data/Dump/Streamer.pm

angelabad-guest at users.alioth.debian.org angelabad-guest at users.alioth.debian.org
Tue Feb 1 13:05:42 UTC 2011


Author: angelabad-guest
Date: Tue Feb  1 13:01:03 2011
New Revision: 68083

URL: http://svn.debian.org/wsvn/pkg-perl/?sc=1&rev=68083
Log:
[svn-upgrade] new version libdata-dump-streamer-perl (2.26)

Modified:
    branches/upstream/libdata-dump-streamer-perl/current/Changes
    branches/upstream/libdata-dump-streamer-perl/current/META.yml
    branches/upstream/libdata-dump-streamer-perl/current/lib/Data/Dump/Streamer.pm

Modified: branches/upstream/libdata-dump-streamer-perl/current/Changes
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libdata-dump-streamer-perl/current/Changes?rev=68083&op=diff
==============================================================================
--- branches/upstream/libdata-dump-streamer-perl/current/Changes (original)
+++ branches/upstream/libdata-dump-streamer-perl/current/Changes Tue Feb  1 13:01:03 2011
@@ -1,3 +1,6 @@
+2.26
+Keep a glob reference open while inspecting through it with B. [RT #65272]
+
 2.25 (2011-01-24)
 Oops, add ppport.h to the packaged distribution
 

Modified: branches/upstream/libdata-dump-streamer-perl/current/META.yml
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libdata-dump-streamer-perl/current/META.yml?rev=68083&op=diff
==============================================================================
--- branches/upstream/libdata-dump-streamer-perl/current/META.yml (original)
+++ branches/upstream/libdata-dump-streamer-perl/current/META.yml Tue Feb  1 13:01:03 2011
@@ -22,7 +22,7 @@
   ExtUtils::Depends: 0
   Module::Build: 0
   perl: 5.006
-generated_by: 'Module::Build version 0.3603'
+generated_by: 'Module::Build version 0.3607'
 license: perl
 meta-spec:
   url: http://module-build.sourceforge.net/META-spec-v1.4.html
@@ -31,10 +31,10 @@
 provides:
   Data::Dump::Streamer:
     file: lib/Data/Dump/Streamer.pm
-    version: 2.25
+    version: 2.26
   Data::Dump::Streamer::Deparser:
     file: lib/Data/Dump/Streamer.pm
-    version: 2.25
+    version: 2.26
 recommends:
   Algorithm::Diff: 0
   Compress::Zlib: 0
@@ -60,4 +60,4 @@
   warnings::register: 0
 resources:
   license: http://dev.perl.org/licenses/
-version: 2.25
+version: 2.26

Modified: branches/upstream/libdata-dump-streamer-perl/current/lib/Data/Dump/Streamer.pm
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libdata-dump-streamer-perl/current/lib/Data/Dump/Streamer.pm?rev=68083&op=diff
==============================================================================
--- branches/upstream/libdata-dump-streamer-perl/current/lib/Data/Dump/Streamer.pm (original)
+++ branches/upstream/libdata-dump-streamer-perl/current/lib/Data/Dump/Streamer.pm Tue Feb  1 13:01:03 2011
@@ -34,7 +34,7 @@
 
 BEGIN {
     #$Id: Streamer.pm 40 2007-12-22 00:37:55Z demerphq $#
-    $VERSION   ='2.25';
+    $VERSION   ='2.26';
     $VERSION = eval $VERSION; # used for beta stuff.
     @ISA       = qw(Exporter DynaLoader);
     @EXPORT=qw(Dump DumpLex DumpVars);
@@ -1875,7 +1875,13 @@
             ) {
                 # from link from [ysth]: http://groups.google.com/groups?selm=laUs8gzkgOlT092yn%40efn.org
                 # translate arg (or reference to it) into a B::* object
-                my $Bobj = B::svref_2object(\*$lhs);
+
+                # To work-around perl commit
+                # 2acc3314e31a9342e325f35c5b592967c9850c9b, keep the
+                # value \*$lhs alive while we inspect it as a B object
+                # or else it'll be reaped while we're using it.
+                my $lhs_glob = \*$lhs;
+                my $Bobj = B::svref_2object($lhs_glob);
 
                 # if passed a glob or globref, get the format
                 $Bobj = B::GV::FORM($Bobj) if ref $Bobj eq 'B::GV';
@@ -3671,7 +3677,7 @@
 our @ISA=qw(B::Deparse);
 my %cache;
 
-our $VERSION = '2.25';
+our $VERSION = '2.26';
 if ( $VERSION ne $Data::Dump::Streamer::VERSION ) {
     die "Incompatible Data::Dump::Streamer::Deparser v$VERSION vs Data::Dump::Streamer v$Data::Dump::Streamer::VERSION";
 }




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