r63795 - in /branches/upstream/libdevel-stacktrace-perl/current: Changes INSTALL MANIFEST META.json META.yml Makefile.PL README SIGNATURE dist.ini lib/Devel/StackTrace.pm lib/Devel/StackTrace/Frame.pm t/06-dollar-at.t t/release-eol.t

periapt-guest at users.alioth.debian.org periapt-guest at users.alioth.debian.org
Sat Oct 16 09:14:52 UTC 2010 

Author: periapt-guest
Date: Sat Oct 16 09:14:23 2010
New Revision: 63795

URL: http://svn.debian.org/wsvn/pkg-perl/?sc=1&rev=63795
Log:
[svn-upgrade] new version libdevel-stacktrace-perl (1.2600)

Added:
    branches/upstream/libdevel-stacktrace-perl/current/t/06-dollar-at.t
Modified:
    branches/upstream/libdevel-stacktrace-perl/current/Changes
    branches/upstream/libdevel-stacktrace-perl/current/INSTALL
    branches/upstream/libdevel-stacktrace-perl/current/MANIFEST
    branches/upstream/libdevel-stacktrace-perl/current/META.json
    branches/upstream/libdevel-stacktrace-perl/current/META.yml
    branches/upstream/libdevel-stacktrace-perl/current/Makefile.PL
    branches/upstream/libdevel-stacktrace-perl/current/README
    branches/upstream/libdevel-stacktrace-perl/current/SIGNATURE
    branches/upstream/libdevel-stacktrace-perl/current/dist.ini
    branches/upstream/libdevel-stacktrace-perl/current/lib/Devel/StackTrace.pm
    branches/upstream/libdevel-stacktrace-perl/current/lib/Devel/StackTrace/Frame.pm
    branches/upstream/libdevel-stacktrace-perl/current/t/release-eol.t

Modified: branches/upstream/libdevel-stacktrace-perl/current/Changes
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libdevel-stacktrace-perl/current/Changes?rev=63795&op=diff
==============================================================================
--- branches/upstream/libdevel-stacktrace-perl/current/Changes (original)
+++ branches/upstream/libdevel-stacktrace-perl/current/Changes Sat Oct 16 09:14:23 2010
@@ -1,10 +1,16 @@
-1.25  Sep 6, 2010
+1.26  2010-10-15
+
+- The as_string method did not localize $@ and $SIG{__DIE__} before doing an
+  eval. Reported and tested by Marc Mims. RT #61072.
+
+
+1.25  2010-09-06
 
 - Devel::StackTraceFrame was not actually subclassing
   Devel::StackTrace::Frame. Patch by Tatsuhiko Miyagawa.
 
 
-1.24  Sep 3, 2010
+1.24  2010-09-03
 
 - Version 1.23 was missing a $VERSION assignment. Reported by Sergei
   Vyshenski.
@@ -15,13 +21,13 @@
   shim.
 
 
-1.23  Aug 27, 2010
+1.23  2010-08-27
 
 - Added message and indent constructor parameters. Based on a patch by James
   Laver. RT #59830.
 
 
-1.22  Jul 15, 2009
+1.22  2009-07-15
 
 - Apparently, overload::StrVal on older Perls (5.8.5, but not 5.8.8)
   tried to call a stringification method if it existed. So now,
@@ -29,7 +35,7 @@
   always be safe. Reported by Michael Stevens. Fixes RT #47900.
 
 
-1.21  Jul 1, 2009
+1.21  2009-07-01
 
 - Overloaded objects which didn't provide a stringification method
   cause Devel::StackTrace to die when respect_overload was
@@ -40,7 +46,7 @@
   from a patch proposed by Florian Ragwitz. RT #47415.
 
 
-1.20  Oct 25, 2008
+1.20  2008-10-25
 
 - The change in 1.15 to object creation broke the no_refs feature,
   causing references to be stored until the trace's frame objects were
@@ -50,7 +56,7 @@
   overload::StrVal().
 
 
-1.1902  Jul 16, 2008
+1.1902  2008-07-16
 
 - This release just contains another test fix.
 
@@ -58,7 +64,7 @@
   5.8.8. Reported by Lee Heagney. RT #37702.
 
 
-1.1901  Jun 13, 2008
+1.1901  2008-06-13
 
 - This release just contains a test fix.
 
@@ -67,7 +73,7 @@
   Andreas Koenig's smokebots.
 
 
-1.19  Jun 13, 2008
+1.19  2008-06-13
 
 - Dropped support for Perl 5.005.
 
@@ -78,26 +84,26 @@
   argument list. Reported by Alex Vandiver.
 
 
-1.18  Mar 31, 2008
+1.18  2008-03-31
 
 - Fix a test failure on Win32. No changes to the non-test code.
 
 
-1.17  Mar 30, 2008
+1.17  2008-03-30
 
 - Added a max_arg_length parameter, which if set causes
   Devel::StackTrace to truncate long strings when printing out a
   frame. RT #33519. Patch by Ian Burrell. 
 
 
-1.16  Feb 2, 2008
+1.16  2008-02-02
 
 - A test fix for bleadperl. The value of wantarray from caller() needs
   to be treated as a boolean, as opposed to expecting 0 (vs
   undef). RT #32583. Patch by Jerry Hedden.
 
 
-1.15  Apr 28, 2007
+1.15  2007-04-28
 
 - Changed how objects are created in order to greatly speed up the
   constructor. Instead of processing all the stack trace data when the
@@ -114,13 +120,13 @@
     new 7353/s 317%   --
 
 
-1.14  Mar 16, 2007
+1.14  2007-03-16
 
 - Added a few micro-optimizations from Ruslan Zakirov, who is hoping
   this will ultimately help speed up RT.
 
 
-1.13  Apr 1, 2006
+1.13  2006-04-01
 
 - Add another fix for filename handling in the tests. Tests were
   giving false failures on Win32 because the tests needed to use
@@ -128,7 +134,7 @@
   internally.
 
 
-1.12  Sep 30, 2005
+1.12  2005-09-30
 
 - Newer versions of Perl use Unix-style filenames when reporting the
   filename in caller(), which breaks Exception::Class tests on other
@@ -137,14 +143,14 @@
   Reported by Garret Goebel.
 
 
-1.11  Apr 12, 2004
+1.11  2004-04-12
 
 - No code changes, just switching to including a Makefile.PL that uses
   ExtUtils::MakeMaker instead of one that sneakily uses Module::Build.
   Requested by Perrin Harkins.
 
 
-1.10  Mar 10, 2004
+1.10  2004-03-10
 
 - Silence a warning from the test code if Exception::Class isn't
   installed.  Reported by Stefano Ruberti.
@@ -156,26 +162,26 @@
   Reported by Jesse Erlbaum.
 
 
-1.09  Feb 26, 2004
+1.09  2004-02-26
 
 - The overload workaround blows up if a DBI handle is anywhere in the
   stack, because of a bad interaction between overload::Overloaded and
   DBI's custom dispatching.  This release works around that.
 
 
-1.08  Feb 23, 2004
+1.08  2004-02-23
 
 - Some tests failed on Win32 because they were hardcoded to expect a
   file name with forward slashes.  Reported by Steve Hay.
 
 
-1.07  Feb 21, 2004
+1.07  2004-02-21
 
 - This release includes a change to the overload handling that is
   necessary for cooperation with Exception::Class.
 
 
-1.06  Feb 21, 2004
+1.06  2004-02-21
 
 - Devel::StackTrace now uses overload::StrVal() to get the underlying
   string value of an overloaded object when creating a stack frame for
@@ -183,14 +189,14 @@
   true value.  Suggested by Matt Sisk.
 
 
-1.05  Feb 17, 2004
+1.05  2004-02-17
 
 - Devel::StackTrace incorrectly reported that arguments were being
   passed to eval blocks (which isn't possible).  Reported by Mark
   Dedlow.
 
 
-1.04  Sep 25, 2003
+1.04  2003-09-25
 
 - The special handling of Exception::Class::Base objects was broken.
   This was exposed by the fact that Exception::Class 1.15 now uses
@@ -198,18 +204,18 @@
   previously.
 
 
-1.03  Jan 22, 2003
+1.03  2003-01-22
 
 - Special handling of Exception::Class::Base objects when stringifying
   references.  This avoids infinite recursion between the two classes.
 
 
-1.02  Sep 19, 2002
+1.02  2002-09-19
 
 - Forgot to add Test::More to PREREQ_PM for previous releases.
 
 
-1.01  Sep 18, 2002
+1.01  2002-09-18
 
 - Change the "no object refs" feature to be a plain old "no refs"
   feature.  As was pointed out to me by Jean-Phillippe Bouchard, a
@@ -223,7 +229,7 @@
   thing as the "no_refs" parameter.
 
 
-1.00  Aug 23, 2002 (from Taiwan)
+1.00  2010-10-15
 
 - Add an option to not store references to objects in stack frames.
   This can be important if you're expecting DESTROY to be called but a
@@ -231,7 +237,7 @@
   object(s).  Based on discussion with Tatsuhiko Miyagawa.
 
 
-0.9   Nov 24, 2001
+0.9   2001-11-24
 
 - Doc tweaks.
 

Modified: branches/upstream/libdevel-stacktrace-perl/current/INSTALL
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libdevel-stacktrace-perl/current/INSTALL?rev=63795&op=diff
==============================================================================
--- branches/upstream/libdevel-stacktrace-perl/current/INSTALL (original)
+++ branches/upstream/libdevel-stacktrace-perl/current/INSTALL Sat Oct 16 09:14:23 2010
@@ -38,7 +38,7 @@
 
 ## Documentation
 
-Devel-StackTrace documentation is available as in POD.
+Devel-StackTrace documentation is available as POD.
 You can run perldoc from a shell to read the documentation:
 
     % perldoc Devel::StackTrace

Modified: branches/upstream/libdevel-stacktrace-perl/current/MANIFEST
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libdevel-stacktrace-perl/current/MANIFEST?rev=63795&op=diff
==============================================================================
--- branches/upstream/libdevel-stacktrace-perl/current/MANIFEST (original)
+++ branches/upstream/libdevel-stacktrace-perl/current/MANIFEST Sat Oct 16 09:14:23 2010
@@ -15,6 +15,7 @@
 t/03-message.t
 t/04-indent.t
 t/05-back-compat.t
+t/06-dollar-at.t
 t/release-eol.t
 t/release-kwalitee.t
 t/release-no-tabs.t

Modified: branches/upstream/libdevel-stacktrace-perl/current/META.json
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libdevel-stacktrace-perl/current/META.json?rev=63795&op=diff
==============================================================================
--- branches/upstream/libdevel-stacktrace-perl/current/META.json (original)
+++ branches/upstream/libdevel-stacktrace-perl/current/META.json Sat Oct 16 09:14:23 2010
@@ -4,7 +4,7 @@
       "Dave Rolsky <autarch at urth.org>"
    ],
    "dynamic_config" : 0,
-   "generated_by" : "Dist::Zilla version 4.102340, CPAN::Meta::Converter version 2.101670",
+   "generated_by" : "Dist::Zilla version 4.102341, CPAN::Meta::Converter version 2.101670",
    "license" : [
       "artistic_2"
    ],
@@ -43,6 +43,6 @@
          "web" : "http://hg.urth.org/hg/Devel-StackTrace"
       }
    },
-   "version" : "1.25"
+   "version" : "1.26"
 }
 

Modified: branches/upstream/libdevel-stacktrace-perl/current/META.yml
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libdevel-stacktrace-perl/current/META.yml?rev=63795&op=diff
==============================================================================
--- branches/upstream/libdevel-stacktrace-perl/current/META.yml (original)
+++ branches/upstream/libdevel-stacktrace-perl/current/META.yml Sat Oct 16 09:14:23 2010
@@ -7,7 +7,7 @@
 configure_requires:
   ExtUtils::MakeMaker: 6.31
 dynamic_config: 0
-generated_by: 'Dist::Zilla version 4.102340, CPAN::Meta::Converter version 2.101670'
+generated_by: 'Dist::Zilla version 4.102341, CPAN::Meta::Converter version 2.101670'
 license: artistic_2
 meta-spec:
   url: http://module-build.sourceforge.net/META-spec-v1.4.html
@@ -19,4 +19,4 @@
 resources:
   bugtracker: http://rt.cpan.org/NoAuth/Bugs.html?Dist=Devel-StackTrace
   repository: http://hg.urth.org/hg/Devel-StackTrace
-version: 1.25
+version: 1.26

Modified: branches/upstream/libdevel-stacktrace-perl/current/Makefile.PL
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libdevel-stacktrace-perl/current/Makefile.PL?rev=63795&op=diff
==============================================================================
--- branches/upstream/libdevel-stacktrace-perl/current/Makefile.PL (original)
+++ branches/upstream/libdevel-stacktrace-perl/current/Makefile.PL Sat Oct 16 09:14:23 2010
@@ -25,7 +25,7 @@
     'File::Spec' => '0',
     'Scalar::Util' => '0'
   },
-  'VERSION' => '1.25',
+  'VERSION' => '1.26',
   'test' => {
     'TESTS' => 't/*.t'
   }

Modified: branches/upstream/libdevel-stacktrace-perl/current/README
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libdevel-stacktrace-perl/current/README?rev=63795&op=diff
==============================================================================
--- branches/upstream/libdevel-stacktrace-perl/current/README (original)
+++ branches/upstream/libdevel-stacktrace-perl/current/README Sat Oct 16 09:14:23 2010
@@ -1,7 +1,7 @@
 
 
 This archive contains the distribution Devel-StackTrace,
-version 1.25:
+version 1.26:
 
   An object representing a stack trace
 

Modified: branches/upstream/libdevel-stacktrace-perl/current/SIGNATURE
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libdevel-stacktrace-perl/current/SIGNATURE?rev=63795&op=diff
==============================================================================
--- branches/upstream/libdevel-stacktrace-perl/current/SIGNATURE (original)
+++ branches/upstream/libdevel-stacktrace-perl/current/SIGNATURE Sat Oct 16 09:14:23 2010
@@ -14,23 +14,24 @@
 -----BEGIN PGP SIGNED MESSAGE-----
 Hash: SHA1
 
-SHA1 d430d35e50b010c4cbdc9dfa3ac1a57e5153a989 Changes
-SHA1 b126cdc313e3c5525664e98cbc68439902ca7bdf INSTALL
+SHA1 0f6c060022970be132aed1d5dd626bfdbda63c52 Changes
+SHA1 0dd1a5b7ce6d39832f3539c41d34a3b43bf88db6 INSTALL
 SHA1 23c628b4a8a36738405ccdacaeb912d2e727b4c0 LICENSE
-SHA1 8210bc39bca4125614fbc22b79a017eb74dc0aab MANIFEST
-SHA1 0c87a45ec9709998bc2600120e851278a7b183a8 META.json
-SHA1 c8ddbce2b65cdf8cf5045e26555f93361aaba190 META.yml
-SHA1 b0af5116ae8ed7ce0ab7326604f0a0c175e34682 Makefile.PL
-SHA1 933f9791f98ad3dc3877bdf08bd422046024355e README
-SHA1 29f39f4e5c67844e400e22aa9add0904d0226ffd dist.ini
-SHA1 e905b70bdd2fe15398d76e3f23f427aa189ebd50 lib/Devel/StackTrace.pm
-SHA1 54ec051731a8083f44f54c0cf7cc57a48aa5efda lib/Devel/StackTrace/Frame.pm
+SHA1 efb3ca90f1284a6a1ca2c90c2e8b2e8c3540c181 MANIFEST
+SHA1 1ad41e7e8c4e9987e09f4d8ac7848438c5809a78 META.json
+SHA1 0f2f22c309c13b99baf15e1cf4096e45b371b12f META.yml
+SHA1 b0728b5aa9e34b455207c67548e3b8ebef65d935 Makefile.PL
+SHA1 c52cdc155bd393046de26d2cf781a75d514a9b34 README
+SHA1 19c342b0886398c2dd8ffde6d59aa6b944bb742f dist.ini
+SHA1 316680bfc5a43d6076658e84e884c49f81158176 lib/Devel/StackTrace.pm
+SHA1 b19e909ab7f2eecc43b2131d26f30dd21905ed6c lib/Devel/StackTrace/Frame.pm
 SHA1 1ef297d54ff84ea2b7e24e6e351c2107ffda2594 t/01-basic.t
 SHA1 9070c7a3d470b3648a017563c731b657ea8f0143 t/02-bad-utf8.t
 SHA1 afa39934e2b6e665cd2994663273af9a477e52b8 t/03-message.t
 SHA1 e3b74665df972492c41a5fc6ea193a8b863584d4 t/04-indent.t
 SHA1 bcd35584775b6d49e1ad7b5a8ad7abc9785d4629 t/05-back-compat.t
-SHA1 24b525e3c18f37f8022a01ec30de757cefb679ff t/release-eol.t
+SHA1 fffc3b1c456cf9994855945cc85f9fa905ca618a t/06-dollar-at.t
+SHA1 a032c41ef6887fab1b900669c2d304fab46680e2 t/release-eol.t
 SHA1 961a1e2c92d836c8cad2d34b784cbc75345dec63 t/release-kwalitee.t
 SHA1 455d1dd1867212a665ad5ea4126b572411de300c t/release-no-tabs.t
 SHA1 efadc0fba3c3821f1254c582a2bfd22ea198633d t/release-pod-coverage.t
@@ -39,7 +40,7 @@
 -----BEGIN PGP SIGNATURE-----
 Version: GnuPG v1.4.10 (GNU/Linux)
 
-iEYEARECAAYFAkyFAHcACgkQIgMCsV8qvRLokwCfT3jIw5DhXg0lpvvP/fgp8xsd
-xlUAn3F01MY0Di+Bs2/+6be4FlRG1/5k
-=ASNl
+iEYEARECAAYFAky4ck0ACgkQIgMCsV8qvRJK/ACfR4Pyfzz3cpNJODdVqWb9BLqw
+Du8AmgJoZ9kwsjAGZlkRbbR4bruLvXup
+=5XUg
 -----END PGP SIGNATURE-----

Modified: branches/upstream/libdevel-stacktrace-perl/current/dist.ini
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libdevel-stacktrace-perl/current/dist.ini?rev=63795&op=diff
==============================================================================
--- branches/upstream/libdevel-stacktrace-perl/current/dist.ini (original)
+++ branches/upstream/libdevel-stacktrace-perl/current/dist.ini Sat Oct 16 09:14:23 2010
@@ -2,7 +2,7 @@
 author = Dave Rolsky <autarch at urth.org>
 copyright_year = 2010
 
-version = 1.25
+version = 1.26
 
 [@Basic]
 

Modified: branches/upstream/libdevel-stacktrace-perl/current/lib/Devel/StackTrace.pm
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libdevel-stacktrace-perl/current/lib/Devel/StackTrace.pm?rev=63795&op=diff
==============================================================================
--- branches/upstream/libdevel-stacktrace-perl/current/lib/Devel/StackTrace.pm (original)
+++ branches/upstream/libdevel-stacktrace-perl/current/lib/Devel/StackTrace.pm Sat Oct 16 09:14:23 2010
@@ -1,6 +1,6 @@
 package Devel::StackTrace;
 BEGIN {
-  $Devel::StackTrace::VERSION = '1.25';
+  $Devel::StackTrace::VERSION = '1.26';
 }
 
 use 5.006;
@@ -47,7 +47,7 @@
         = do { package # the newline keeps dzil from adding a version here
                    DB;
 BEGIN {
-  $DB::VERSION = '1.25';
+  $DB::VERSION = '1.26';
 } @DB::args = (); caller( $x++ ) }
         ) {
         my @args = @DB::args;
@@ -248,7 +248,7 @@
 
 =head1 VERSION
 
-version 1.25
+version 1.26
 
 =head1 SYNOPSIS
 
@@ -433,7 +433,7 @@
 
 =head1 AUTHOR
 
-  Dave Rolsky <autarch at urth.org>
+Dave Rolsky <autarch at urth.org>
 
 =head1 COPYRIGHT AND LICENSE
 

Modified: branches/upstream/libdevel-stacktrace-perl/current/lib/Devel/StackTrace/Frame.pm
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libdevel-stacktrace-perl/current/lib/Devel/StackTrace/Frame.pm?rev=63795&op=diff
==============================================================================
--- branches/upstream/libdevel-stacktrace-perl/current/lib/Devel/StackTrace/Frame.pm (original)
+++ branches/upstream/libdevel-stacktrace-perl/current/lib/Devel/StackTrace/Frame.pm Sat Oct 16 09:14:23 2010
@@ -1,6 +1,6 @@
 package Devel::StackTrace::Frame;
 BEGIN {
-  $Devel::StackTrace::Frame::VERSION = '1.25';
+  $Devel::StackTrace::Frame::VERSION = '1.26';
 }
 
 use strict;
@@ -102,6 +102,9 @@
                 $_ = $self->Devel::StackTrace::_ref_to_string($_)
                     if ref $_;
 
+                local $SIG{__DIE__};
+                local $@;
+
                 eval {
                     if ( $self->{max_arg_length}
                         && length $_ > $self->{max_arg_length} ) {
@@ -149,7 +152,7 @@
 
 =head1 VERSION
 
-version 1.25
+version 1.26
 
 =head1 DESCRIPTION
 
@@ -195,7 +198,7 @@
 
 =head1 AUTHOR
 
-  Dave Rolsky <autarch at urth.org>
+Dave Rolsky <autarch at urth.org>
 
 =head1 COPYRIGHT AND LICENSE
 

Added: branches/upstream/libdevel-stacktrace-perl/current/t/06-dollar-at.t
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libdevel-stacktrace-perl/current/t/06-dollar-at.t?rev=63795&op=file
==============================================================================
--- branches/upstream/libdevel-stacktrace-perl/current/t/06-dollar-at.t (added)
+++ branches/upstream/libdevel-stacktrace-perl/current/t/06-dollar-at.t Sat Oct 16 09:14:23 2010
@@ -1,0 +1,14 @@
+use strict;
+use warnings;
+
+use Test::More;
+
+use Devel::StackTrace;
+
+$@ = my $msg = "Don't tread on me";
+
+Devel::StackTrace->new->frame(0)->as_string;
+
+is( $@, $msg, '$@ is not overwritten in as_string() method' );
+
+done_testing();

Modified: branches/upstream/libdevel-stacktrace-perl/current/t/release-eol.t
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libdevel-stacktrace-perl/current/t/release-eol.t?rev=63795&op=diff
==============================================================================
--- branches/upstream/libdevel-stacktrace-perl/current/t/release-eol.t (original)
+++ branches/upstream/libdevel-stacktrace-perl/current/t/release-eol.t Sat Oct 16 09:14:23 2010
@@ -13,4 +13,4 @@
 eval 'use Test::EOL';
 plan skip_all => 'Test::EOL required' if $@;
 
-all_perl_files_ok();
+all_perl_files_ok({ trailing_whitespace => 1 });

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