r68085 - in /trunk/libdata-dump-streamer-perl: Changes META.yml debian/changelog debian/copyright lib/Data/Dump/Streamer.pm

Tue Feb 1 13:48:26 UTC 2011

Author: angelabad-guest
Date: Tue Feb  1 13:48:14 2011
New Revision: 68085

URL: http://svn.debian.org/wsvn/pkg-perl/?sc=1&rev=68085
Log:
debian/copyright: Add copyright information about
lib/Data/Dump/ppport.h

Modified:
    trunk/libdata-dump-streamer-perl/Changes
    trunk/libdata-dump-streamer-perl/META.yml
    trunk/libdata-dump-streamer-perl/debian/changelog
    trunk/libdata-dump-streamer-perl/debian/copyright
    trunk/libdata-dump-streamer-perl/lib/Data/Dump/Streamer.pm

Modified: trunk/libdata-dump-streamer-perl/Changes
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libdata-dump-streamer-perl/Changes?rev=68085&op=diff
==============================================================================

--- trunk/libdata-dump-streamer-perl/Changes (original)
+++ trunk/libdata-dump-streamer-perl/Changes Tue Feb  1 13:48:14 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: trunk/libdata-dump-streamer-perl/META.yml
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libdata-dump-streamer-perl/META.yml?rev=68085&op=diff
==============================================================================
--- trunk/libdata-dump-streamer-perl/META.yml (original)
+++ trunk/libdata-dump-streamer-perl/META.yml Tue Feb  1 13:48:14 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: trunk/libdata-dump-streamer-perl/debian/changelog
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libdata-dump-streamer-perl/debian/changelog?rev=68085&op=diff
==============================================================================
--- trunk/libdata-dump-streamer-perl/debian/changelog (original)
+++ trunk/libdata-dump-streamer-perl/debian/changelog Tue Feb  1 13:48:14 2011
@@ -1,11 +1,10 @@
-libdata-dump-streamer-perl (2.25-1) UNRELEASED; urgency=low
-
-  TODO:
-  d/copyright: add info about new lib/Data/Dump/ppport.h
+libdata-dump-streamer-perl (2.26-1) unstable; urgency=low
 
   * New upstream release
+  * debian/copyright: Add copyright information about
+    lib/Data/Dump/ppport.h
 
- -- Angel Abad <angelabad at gmail.com>  Tue, 25 Jan 2011 00:04:12 +0100
+ -- Angel Abad <angelabad at gmail.com>  Tue, 01 Feb 2011 14:47:43 +0100
 
 libdata-dump-streamer-perl (2.23-1) unstable; urgency=low
 

Modified: trunk/libdata-dump-streamer-perl/debian/copyright
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libdata-dump-streamer-perl/debian/copyright?rev=68085&op=diff
==============================================================================
--- trunk/libdata-dump-streamer-perl/debian/copyright (original)
+++ trunk/libdata-dump-streamer-perl/debian/copyright Tue Feb  1 13:48:14 2011
@@ -12,11 +12,17 @@
  parts Copyright 1997-2000, Graham Barr <gbarr at pobox.com>
 License: Artistic or GPL-1+
 
+Files: lib/Data/Dump/ppport.h 
+Copyright: 2004-2009, Marcus Holland-Moritz <mhx-cpan at gmx.net>
+ 2001, Paul Marquess <pmqs at cpan.org> (Version 2.x)
+ 1999, Kenneth Albanowski <kjahds at kjahds.com> (Version 1.x)
+License: Artistic or GPL-1+
+
 Files: debian/*
 Copyright: 2007-2009, Gunnar Wolf <gwolf at debian.org>
- 2007, Russ Allbery <rra at debian.org>
  2007, Alexis Sukrieh <sukria at debian.org>
  2007, Damyan Ivanov <dmn at debian.org>
+ 2007, Russ Allbery <rra at debian.org>
  2008, Niko Tyni <ntyni at debian.org>
  2009, Ryan Niebur <ryan at debian.org>
  2010-2011, Angel Abad <angelabad at gmail.com>

Modified: trunk/libdata-dump-streamer-perl/lib/Data/Dump/Streamer.pm
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libdata-dump-streamer-perl/lib/Data/Dump/Streamer.pm?rev=68085&op=diff
==============================================================================
--- trunk/libdata-dump-streamer-perl/lib/Data/Dump/Streamer.pm (original)
+++ trunk/libdata-dump-streamer-perl/lib/Data/Dump/Streamer.pm Tue Feb  1 13:48:14 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";
 }


