r75601 - in /trunk/libuniversal-can-perl: ./ debian/ debian/source/ lib/UNIVERSAL/ t/
ghedo-guest at users.alioth.debian.org
ghedo-guest at users.alioth.debian.org
Mon Jun 13 10:36:39 UTC 2011
Author: ghedo-guest
Date: Mon Jun 13 10:36:32 2011
New Revision: 75601
URL: http://svn.debian.org/wsvn/pkg-perl/?sc=1&rev=75601
Log:
* New upstream release
* Switch to 3.0 (quilt) format
* Bump debhelper compat level to 8
* Remove Build-Depends on libmodule-build-perl (is in Perl core)
* Add myself to Uploaders
* Bump Standards-Version to 3.9.2 (no changes needed)
* Update upstream copyright years
Added:
trunk/libuniversal-can-perl/LICENSE
- copied unchanged from r75600, branches/upstream/libuniversal-can-perl/current/LICENSE
trunk/libuniversal-can-perl/Makefile.PL
- copied unchanged from r75600, branches/upstream/libuniversal-can-perl/current/Makefile.PL
trunk/libuniversal-can-perl/debian/source/
trunk/libuniversal-can-perl/debian/source/format
trunk/libuniversal-can-perl/dist.ini
- copied unchanged from r75600, branches/upstream/libuniversal-can-perl/current/dist.ini
trunk/libuniversal-can-perl/t/bugs.t
- copied unchanged from r75600, branches/upstream/libuniversal-can-perl/current/t/bugs.t
trunk/libuniversal-can-perl/t/isa-triggering-overload.t
- copied unchanged from r75600, branches/upstream/libuniversal-can-perl/current/t/isa-triggering-overload.t
Removed:
trunk/libuniversal-can-perl/Build.PL
Modified:
trunk/libuniversal-can-perl/Changes
trunk/libuniversal-can-perl/MANIFEST
trunk/libuniversal-can-perl/META.yml
trunk/libuniversal-can-perl/README
trunk/libuniversal-can-perl/debian/changelog
trunk/libuniversal-can-perl/debian/compat
trunk/libuniversal-can-perl/debian/control
trunk/libuniversal-can-perl/debian/copyright
trunk/libuniversal-can-perl/lib/UNIVERSAL/can.pm
Modified: trunk/libuniversal-can-perl/Changes
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libuniversal-can-perl/Changes?rev=75601&op=diff
==============================================================================
--- trunk/libuniversal-can-perl/Changes (original)
+++ trunk/libuniversal-can-perl/Changes Mon Jun 13 10:36:32 2011
@@ -1,4 +1,9 @@
Revision history for UNIVERSAL::can
+
+1.20110613 2011-06-12 18:31:27 America/Los_Angeles
+ - fixed RT #63771, buggy triggering of overloading for blessed invocants
+ (found and fixed by Norbert Buchmüller)
+ - migrated to Dist::Zilla
1.16 Thu Jan 14 22:55:10 UTC 2010
- applied patch to fix deep recursion crash (RT #49580, Daniel LeWarne)
Modified: trunk/libuniversal-can-perl/MANIFEST
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libuniversal-can-perl/MANIFEST?rev=75601&op=diff
==============================================================================
--- trunk/libuniversal-can-perl/MANIFEST (original)
+++ trunk/libuniversal-can-perl/MANIFEST Mon Jun 13 10:36:32 2011
@@ -1,14 +1,18 @@
-Build.PL
Changes
+LICENSE
MANIFEST
-META.yml # Will be created by "make dist"
+META.yml
+Makefile.PL
README
+dist.ini
lib/UNIVERSAL/can.pm
-t/lib/Test/SmallWarn.pm
t/00-load.t
+t/SUPER-can.t
t/always_warn.t
t/bad-input.t
+t/bugs.t
t/class.t
t/deep-recursion.t
+t/isa-triggering-overload.t
+t/lib/Test/SmallWarn.pm
t/object.t
-t/SUPER-can.t
Modified: trunk/libuniversal-can-perl/META.yml
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libuniversal-can-perl/META.yml?rev=75601&op=diff
==============================================================================
--- trunk/libuniversal-can-perl/META.yml (original)
+++ trunk/libuniversal-can-perl/META.yml Mon Jun 13 10:36:32 2011
@@ -1,25 +1,24 @@
---
-name: UNIVERSAL-can
-version: 1.16
+abstract: 'work around buggy code calling UNIVERSAL::can() as a function'
author:
- - 'chromatic <chromatic at wgz.org>'
-abstract: Hack around people calling UNIVERSAL::can() as a function
+ - chromatic
+build_requires:
+ Test::More: 0
+ overload: 0
+configure_requires:
+ ExtUtils::MakeMaker: 6.30
+dynamic_config: 0
+generated_by: 'Dist::Zilla version 4.200007, CPAN::Meta::Converter version 2.110930'
license: perl
-resources:
- license: http://dev.perl.org/licenses/
-build_requires:
- Test::Simple: 0.60
-requires:
- Scalar::Util: ''
- Test::Simple: 0.60
- perl: v5.6.2
-configure_requires:
- Module::Build: 0.35
-provides:
- UNIVERSAL::can:
- file: lib/UNIVERSAL/can.pm
- version: 1.16
-generated_by: Module::Build version 0.35
meta-spec:
url: http://module-build.sourceforge.net/META-spec-v1.4.html
version: 1.4
+name: UNIVERSAL-can
+requires:
+ Scalar::Util: 0
+ vars: 0
+ warnings::register: 0
+resources:
+ homepage: https://github.com/chromatic/UNIVERSAL-can
+ repository: https://github.com/chromatic/UNIVERSAL-can.git
+version: 1.20110613
Modified: trunk/libuniversal-can-perl/README
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libuniversal-can-perl/README?rev=75601&op=diff
==============================================================================
--- trunk/libuniversal-can-perl/README (original)
+++ trunk/libuniversal-can-perl/README Mon Jun 13 10:36:32 2011
@@ -1,23 +1,9 @@
UNIVERSAL::can
--------------
-
-Version 1.16, Thu Jan 14 22:54:46 UTC 2010
-
This module attempts to work around people calling UNIVERSAL::can() as a
function, which it is not.
-INSTALLATION
-
-To install this module, run the following commands:
-
- $ perl Build.PL
- $ perl ./Build
- $ perl ./Build test
- $ sudo perl ./Build install
-
-There is also a Makefile.PL, but I don't use it.
-
COPYRIGHT AND LICENCE
- Artistic License 2.0, Copyright (c) chromatic 2005 - 2010.
+Artistic License 2.0, Copyright (c) chromatic 2005 - 2010.
Modified: trunk/libuniversal-can-perl/debian/changelog
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libuniversal-can-perl/debian/changelog?rev=75601&op=diff
==============================================================================
--- trunk/libuniversal-can-perl/debian/changelog (original)
+++ trunk/libuniversal-can-perl/debian/changelog Mon Jun 13 10:36:32 2011
@@ -1,3 +1,15 @@
+libuniversal-can-perl (1.20110613-1) UNRELEASED; urgency=low
+
+ * New upstream release
+ * Switch to 3.0 (quilt) format
+ * Bump debhelper compat level to 8
+ * Remove Build-Depends on libmodule-build-perl (is in Perl core)
+ * Add myself to Uploaders
+ * Bump Standards-Version to 3.9.2 (no changes needed)
+ * Update upstream copyright years
+
+ -- Alessandro Ghedini <al3xbio at gmail.com> Mon, 13 Jun 2011 12:25:46 +0200
+
libuniversal-can-perl (1.16-1) unstable; urgency=low
[ Jonathan Yu ]
Modified: trunk/libuniversal-can-perl/debian/compat
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libuniversal-can-perl/debian/compat?rev=75601&op=diff
==============================================================================
--- trunk/libuniversal-can-perl/debian/compat (original)
+++ trunk/libuniversal-can-perl/debian/compat Mon Jun 13 10:36:32 2011
@@ -1,1 +1,1 @@
-7
+8
Modified: trunk/libuniversal-can-perl/debian/control
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libuniversal-can-perl/debian/control?rev=75601&op=diff
==============================================================================
--- trunk/libuniversal-can-perl/debian/control (original)
+++ trunk/libuniversal-can-perl/debian/control Mon Jun 13 10:36:32 2011
@@ -1,13 +1,13 @@
Source: libuniversal-can-perl
Section: perl
Priority: optional
-Build-Depends: debhelper (>= 7), perl (>= 5.10) | libmodule-build-perl
+Build-Depends: debhelper (>= 8)
Build-Depends-Indep: perl
Maintainer: Debian Perl Group <pkg-perl-maintainers at lists.alioth.debian.org>
Uploaders: Krzysztof Krzyzaniak (eloy) <eloy at debian.org>,
Nathan Handler <nhandler at ubuntu.com>, Ryan Niebur <ryan at debian.org>,
- Jonathan Yu <jawnsy at cpan.org>
-Standards-Version: 3.8.3
+ Jonathan Yu <jawnsy at cpan.org>, Alessandro Ghedini <al3xbio at gmail.com>
+Standards-Version: 3.9.2
Homepage: http://search.cpan.org/dist/UNIVERSAL-can/
Vcs-Svn: svn://svn.debian.org/pkg-perl/trunk/libuniversal-can-perl/
Vcs-Browser: http://svn.debian.org/viewsvn/pkg-perl/trunk/libuniversal-can-perl/
@@ -35,4 +35,4 @@
emit a lexical warning (see perllexwarn) to that effect. You can disable it
with no warnings; or no warnings 'UNIVERSAL::isa';, but don't do that; fix
the code instead.
-
+
Modified: trunk/libuniversal-can-perl/debian/copyright
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libuniversal-can-perl/debian/copyright?rev=75601&op=diff
==============================================================================
--- trunk/libuniversal-can-perl/debian/copyright (original)
+++ trunk/libuniversal-can-perl/debian/copyright Mon Jun 13 10:36:32 2011
@@ -4,7 +4,7 @@
Name: UNIVERSAL-can
Files: *
-Copyright: 2005-2010, chromatic <chromatic at wgz.org>
+Copyright: 2005-2011, chromatic <chromatic at wgz.org>
License: Artistic-2.0
Files: debian/*
Added: trunk/libuniversal-can-perl/debian/source/format
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libuniversal-can-perl/debian/source/format?rev=75601&op=file
==============================================================================
--- trunk/libuniversal-can-perl/debian/source/format (added)
+++ trunk/libuniversal-can-perl/debian/source/format Mon Jun 13 10:36:32 2011
@@ -1,0 +1,1 @@
+3.0 (quilt)
Modified: trunk/libuniversal-can-perl/lib/UNIVERSAL/can.pm
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libuniversal-can-perl/lib/UNIVERSAL/can.pm?rev=75601&op=diff
==============================================================================
--- trunk/libuniversal-can-perl/lib/UNIVERSAL/can.pm (original)
+++ trunk/libuniversal-can-perl/lib/UNIVERSAL/can.pm Mon Jun 13 10:36:32 2011
@@ -1,16 +1,18 @@
package UNIVERSAL::can;
+BEGIN {
+ $UNIVERSAL::can::VERSION = '1.20110613';
+}
+# ABSTRACT: work around buggy code calling UNIVERSAL::can() as a function
use strict;
use warnings;
-use vars qw( $VERSION $recursing );
-$VERSION = '1.16';
+use vars qw( $recursing $always_warn );
use Scalar::Util 'blessed';
use warnings::register;
my $orig;
-use vars '$always_warn';
BEGIN
{
@@ -40,7 +42,8 @@
goto &$orig if $recursing
|| ( defined $caller
&& defined $_[0]
- && eval { local $recursing = 1; $caller->isa($_[0]) } );
+ && eval { local $recursing = 1;
+ $caller->isa(blessed $_[0] || $_[0]) } );
# call an overridden can() if it exists
my $can = eval { $_[0]->$orig('can') || 0 };
@@ -76,11 +79,7 @@
=head1 NAME
-UNIVERSAL::can - Hack around people calling UNIVERSAL::can() as a function
-
-=head1 VERSION
-
-Version 1.16
+UNIVERSAL::can - work around buggy code calling UNIVERSAL::can() as a function
=head1 SYNOPSIS
@@ -143,12 +142,14 @@
Daniel LeWarne found and fixed a deep recursion error.
+Norbert Buchmüller fixed an overloading bug in blessed invocants.
+
The Perl QA list had a huge... discussion... which inspired my realization that
this module needed to do what it does now.
=head1 COPYRIGHT & LICENSE
-Artistic License 2.0, copyright (c) 2005 - 2010 chromatic. Some rights
+Artistic License 2.0, copyright (c) 2005 - 2011 chromatic. Some rights
reserved.
=cut
More information about the Pkg-perl-cvs-commits
mailing list