r55841 - in /trunk/libdevel-caller-perl: Changes META.yml debian/README.source debian/changelog debian/control debian/patches/fix-pod.patch debian/rules debian/source/ debian/source/format debian/watch lib/Devel/Caller.pm

ansgar-guest at users.alioth.debian.org ansgar-guest at users.alioth.debian.org
Sat Apr 10 08:28:58 UTC 2010


Author: ansgar-guest
Date: Sat Apr 10 08:28:51 2010
New Revision: 55841

URL: http://svn.debian.org/wsvn/pkg-perl/?sc=1&rev=55841
Log:
* New upstream release.
* Use source format 3.0 (quilt); drop quilt framework and README.source.
* debian/watch: Use extended regular expression to match upstream releases.
* Add myself to Uploaders.

Added:
    trunk/libdevel-caller-perl/debian/source/
    trunk/libdevel-caller-perl/debian/source/format
Removed:
    trunk/libdevel-caller-perl/debian/README.source
Modified:
    trunk/libdevel-caller-perl/Changes
    trunk/libdevel-caller-perl/META.yml
    trunk/libdevel-caller-perl/debian/changelog
    trunk/libdevel-caller-perl/debian/control
    trunk/libdevel-caller-perl/debian/patches/fix-pod.patch
    trunk/libdevel-caller-perl/debian/rules
    trunk/libdevel-caller-perl/debian/watch
    trunk/libdevel-caller-perl/lib/Devel/Caller.pm

Modified: trunk/libdevel-caller-perl/Changes
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libdevel-caller-perl/Changes?rev=55841&op=diff
==============================================================================
--- trunk/libdevel-caller-perl/Changes (original)
+++ trunk/libdevel-caller-perl/Changes Sat Apr 10 08:28:51 2010
@@ -1,3 +1,7 @@
+2.05 Thursday 8th April, 2010
+	Don't call B::PADOP->gv.  Work by by Florian Ragwitz
+	http://github.com/rafl/perl-devel-caller/commit/248a23390eef48a73bb717be085da58ce50ff784
+
 2.04 Tuesday 16th February, 2010
 	Use CxTYPE macro rather than directly inspecting cx->cx_type
 	http://rt.cpan.org/Public/Bug/Display.html?id=33005

Modified: trunk/libdevel-caller-perl/META.yml
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libdevel-caller-perl/META.yml?rev=55841&op=diff
==============================================================================
--- trunk/libdevel-caller-perl/META.yml (original)
+++ trunk/libdevel-caller-perl/META.yml Sat Apr 10 08:28:51 2010
@@ -1,13 +1,11 @@
 --- #YAML:1.0
 name:               Devel-Caller
-version:            2.04
+version:            2.05
 abstract:           ~
 author:  []
 license:            unknown
 distribution_type:  module
 configure_requires:
-    ExtUtils::MakeMaker:  0
-build_requires:
     ExtUtils::MakeMaker:  0
 requires:
     PadWalker:   0.08
@@ -16,7 +14,7 @@
     directory:
         - t
         - inc
-generated_by:       ExtUtils::MakeMaker version 6.50
+generated_by:       ExtUtils::MakeMaker version 6.48
 meta-spec:
     url:      http://module-build.sourceforge.net/META-spec-v1.4.html
     version:  1.4

Modified: trunk/libdevel-caller-perl/debian/changelog
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libdevel-caller-perl/debian/changelog?rev=55841&op=diff
==============================================================================
--- trunk/libdevel-caller-perl/debian/changelog (original)
+++ trunk/libdevel-caller-perl/debian/changelog Sat Apr 10 08:28:51 2010
@@ -1,3 +1,12 @@
+libdevel-caller-perl (2.05-1) unstable; urgency=low
+
+  * New upstream release.
+  * Use source format 3.0 (quilt); drop quilt framework and README.source.
+  * debian/watch: Use extended regular expression to match upstream releases.
+  * Add myself to Uploaders.
+
+ -- Ansgar Burchardt <ansgar at 43-1.org>  Sat, 10 Apr 2010 17:23:41 +0900
+
 libdevel-caller-perl (2.04-1) unstable; urgency=low
 
   [ Jonathan Yu ]

Modified: trunk/libdevel-caller-perl/debian/control
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libdevel-caller-perl/debian/control?rev=55841&op=diff
==============================================================================
--- trunk/libdevel-caller-perl/debian/control (original)
+++ trunk/libdevel-caller-perl/debian/control Sat Apr 10 08:28:51 2010
@@ -1,10 +1,10 @@
 Source: libdevel-caller-perl
 Section: perl
 Priority: optional
-Build-Depends: debhelper (>= 7.0.8), quilt (>= 0.46-7),
- perl, libpadwalker-perl
+Build-Depends: debhelper (>= 7), perl, libpadwalker-perl
 Maintainer: Debian Perl Group <pkg-perl-maintainers at lists.alioth.debian.org>
-Uploaders: Niko Tyni <ntyni at debian.org>, Jonathan Yu <jawnsy at cpan.org>
+Uploaders: Niko Tyni <ntyni at debian.org>, Jonathan Yu <jawnsy at cpan.org>,
+ Ansgar Burchardt <ansgar at 43-1.org>
 Standards-Version: 3.8.4
 Homepage: http://search.cpan.org/dist/Devel-Caller/
 Vcs-Svn: svn://svn.debian.org/pkg-perl/trunk/libdevel-caller-perl/

Modified: trunk/libdevel-caller-perl/debian/patches/fix-pod.patch
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libdevel-caller-perl/debian/patches/fix-pod.patch?rev=55841&op=diff
==============================================================================
--- trunk/libdevel-caller-perl/debian/patches/fix-pod.patch (original)
+++ trunk/libdevel-caller-perl/debian/patches/fix-pod.patch Sat Apr 10 08:28:51 2010
@@ -1,10 +1,10 @@
 Description: fix POD errors
 Author: Jonathan Yu <jawnsy at cpan.org>
 Origin: vendor
-Forwarded: no
---- a/lib/Devel/Caller.pm
-+++ b/lib/Devel/Caller.pm
-@@ -205,6 +205,7 @@
+Forwarded: https://rt.cpan.org/Public/Bug/Display.html?id=56456
+--- libdevel-caller-perl.orig/lib/Devel/Caller.pm
++++ libdevel-caller-perl/lib/Devel/Caller.pm
+@@ -210,6 +210,7 @@
  C<called_as_method> returns true if the subroutine at $level was
  called as a method.
  

Modified: trunk/libdevel-caller-perl/debian/rules
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libdevel-caller-perl/debian/rules?rev=55841&op=diff
==============================================================================
--- trunk/libdevel-caller-perl/debian/rules (original)
+++ trunk/libdevel-caller-perl/debian/rules Sat Apr 10 08:28:51 2010
@@ -1,4 +1,3 @@
 #!/usr/bin/make -f
-
 %:
-	dh --with quilt $@
+	dh $@

Added: trunk/libdevel-caller-perl/debian/source/format
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libdevel-caller-perl/debian/source/format?rev=55841&op=file
==============================================================================
--- trunk/libdevel-caller-perl/debian/source/format (added)
+++ trunk/libdevel-caller-perl/debian/source/format Sat Apr 10 08:28:51 2010
@@ -1,0 +1,1 @@
+3.0 (quilt)

Modified: trunk/libdevel-caller-perl/debian/watch
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libdevel-caller-perl/debian/watch?rev=55841&op=diff
==============================================================================
--- trunk/libdevel-caller-perl/debian/watch (original)
+++ trunk/libdevel-caller-perl/debian/watch Sat Apr 10 08:28:51 2010
@@ -1,2 +1,2 @@
 version=3
-http://search.cpan.org/dist/Devel-Caller/ .*/Devel-Caller-v?(\d.*).(?:tar.gz|tar|tgz)
+http://search.cpan.org/dist/Devel-Caller/ .*/Devel-Caller-v?(\d[\d.-]+)\.(?:tar(?:\.gz|\.bz2)?|tgz|zip)$

Modified: trunk/libdevel-caller-perl/lib/Devel/Caller.pm
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libdevel-caller-perl/lib/Devel/Caller.pm?rev=55841&op=diff
==============================================================================
--- trunk/libdevel-caller-perl/lib/Devel/Caller.pm (original)
+++ trunk/libdevel-caller-perl/lib/Devel/Caller.pm Sat Apr 10 08:28:51 2010
@@ -7,7 +7,7 @@
 use base qw( Exporter  );
 use 5.008;
 
-our $VERSION = '2.04';
+our $VERSION = '2.05';
 XSLoader::load __PACKAGE__, $VERSION;
 
 our @EXPORT_OK = qw( caller_cv caller_args caller_vars called_with called_as_method );
@@ -92,14 +92,19 @@
             }
 
             my $consider = ($op->name eq "gvsv") ? $op : $prev;
-            my $gv = $consider->gv;
-            print "consider: $consider ", $consider->name, " gv $gv\n"
-              if $DEBUG;
+            my $gv;
+
             if (ref $consider eq 'B::PADOP') {
                 print "GV is really a padgv\n" if $DEBUG;
                 $gv = $padv->ARRAYelt( $consider->padix );
                 print "NEW GV $gv\n" if $DEBUG;
             }
+            else {
+                $gv = $consider->gv;
+            }
+
+            print "consider: $consider ", $consider->name, " gv $gv\n"
+              if $DEBUG;
 
             if ($want_names) {
                 my %sigils = (




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