r22247 - in /trunk/libscalar-defer-perl: Changes MANIFEST META.yml SIGNATURE debian/changelog debian/compat debian/control debian/copyright debian/rules lib/Scalar/Defer.pm t/01-basic.t
yvesago-guest at users.alioth.debian.org
yvesago-guest at users.alioth.debian.org
Sat Jun 28 15:12:18 UTC 2008
Author: yvesago-guest
Date: Sat Jun 28 15:12:17 2008
New Revision: 22247
URL: http://svn.debian.org/wsvn/pkg-perl/?sc=1&rev=22247
Log:
* New upstream release
* Standards-Version: 3.8.0 (no changes)
* Refresh rules with use debhelper 7: changes in compat, and control
* Remove useless README from package
* Put copyright format to proposal rev 102, with inc/ copyright
Modified:
trunk/libscalar-defer-perl/Changes
trunk/libscalar-defer-perl/MANIFEST
trunk/libscalar-defer-perl/META.yml
trunk/libscalar-defer-perl/SIGNATURE
trunk/libscalar-defer-perl/debian/changelog
trunk/libscalar-defer-perl/debian/compat
trunk/libscalar-defer-perl/debian/control
trunk/libscalar-defer-perl/debian/copyright
trunk/libscalar-defer-perl/debian/rules
trunk/libscalar-defer-perl/lib/Scalar/Defer.pm
trunk/libscalar-defer-perl/t/01-basic.t
Modified: trunk/libscalar-defer-perl/Changes
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libscalar-defer-perl/Changes?rev=22247&op=diff
==============================================================================
--- trunk/libscalar-defer-perl/Changes (original)
+++ trunk/libscalar-defer-perl/Changes Sat Jun 28 15:12:17 2008
@@ -1,3 +1,9 @@
+[Changes for 0.15 - 2008-06-27]
+
+* Fix infinite recursion on UNIVERSAL methods used as class methods on
+ Scalar::Defer::Deferred itself.
+ http://rt.cpan.org/Public/Bug/Display.html?id=37153
+
[Changes for 0.14 - 2008-01-09]
* Avoid harmless '(in cleanup)' warnings caused by Class::InsideOut's
Modified: trunk/libscalar-defer-perl/MANIFEST
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libscalar-defer-perl/MANIFEST?rev=22247&op=diff
==============================================================================
--- trunk/libscalar-defer-perl/MANIFEST (original)
+++ trunk/libscalar-defer-perl/MANIFEST Sat Jun 28 15:12:17 2008
@@ -19,6 +19,6 @@
MANIFEST This list of files
META.yml
README
-SIGNATURE Public-key signature (added by MakeMaker)
t/01-basic.t
t/02-is.t
+SIGNATURE Public-key signature (added by MakeMaker)
Modified: trunk/libscalar-defer-perl/META.yml
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libscalar-defer-perl/META.yml?rev=22247&op=diff
==============================================================================
--- trunk/libscalar-defer-perl/META.yml (original)
+++ trunk/libscalar-defer-perl/META.yml Sat Jun 28 15:12:17 2008
@@ -16,11 +16,11 @@
provides:
Scalar::Defer:
file: lib/Scalar/Defer.pm
- version: 0.14
+ version: 0.15
Scalar::Defer::Deferred:
file: lib/Scalar/Defer.pm
requires:
Class::InsideOut: 0
Exporter::Lite: 0
perl: 5.6.0
-version: 0.14
+version: 0.15
Modified: trunk/libscalar-defer-perl/SIGNATURE
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libscalar-defer-perl/SIGNATURE?rev=22247&op=diff
==============================================================================
--- trunk/libscalar-defer-perl/SIGNATURE (original)
+++ trunk/libscalar-defer-perl/SIGNATURE Sat Jun 28 15:12:17 2008
@@ -14,9 +14,9 @@
-----BEGIN PGP SIGNED MESSAGE-----
Hash: SHA1
-SHA1 dbace35e86d2cd9c43f1579b4a71be33cc8fa175 Changes
-SHA1 b8b33e7c6842a35e19c63c7142be3e5e256da149 MANIFEST
-SHA1 73af285145fcd1a4df58ddc59b89ec3d1c553e51 META.yml
+SHA1 fecb756fba00cbb410b9e1fdbc77428d02c21e3a Changes
+SHA1 87264922034d0f62430c0b54b72f67a7eec55305 MANIFEST
+SHA1 795a01606557ef5a5a9b9b4e12960e734f0069b0 META.yml
SHA1 91868dc8231c258af600393393c7fb0362935e85 Makefile.PL
SHA1 91735f73073ea3d7b2d64047e45d25355f516752 README
SHA1 603bb9de29fb8cba7f13409c546750972eff645d inc/Module/AutoInstall.pm
@@ -34,13 +34,13 @@
SHA1 6e95f0ebeb31abc5608a987e88edf2e2427912c4 inc/Test/Builder/Module.pm
SHA1 1296aa4ac787d6df9f9679d2bae4851ffef63e5a inc/Test/More.pm
SHA1 55be398173a2d979a648a73a28c8b3a40531dbba inc/ok.pm
-SHA1 b3920fe09164f1d57a49f4663d45c3a7f7161327 lib/Scalar/Defer.pm
-SHA1 a73b56637ebefda31495df2c2e2e5c06d3bfe3f9 t/01-basic.t
+SHA1 b667e77f08dfff82d02ab46b82fe7a1909c4e891 lib/Scalar/Defer.pm
+SHA1 f89e83f7a812e3b8c6afe96bb087d0b8218cbd04 t/01-basic.t
SHA1 2be303573646cd1aee91665c353bce5cb0efd349 t/02-is.t
-----BEGIN PGP SIGNATURE-----
Version: GnuPG v1.4.3 (Darwin)
-iD8DBQFHg+PvtLPdNzw1AaARAodgAJ45OqeHizZUyoDEQ1QShHhOoFwi1ACfT/V4
-S/qKNx2GmoZdyd/cd4JGrEY=
-=YK2q
+iD8DBQFIZQ+itLPdNzw1AaARAteFAJ9yPqpLExwQi6kuuj2R81DpAeqtEQCgs921
+aaAEaTdZexNhXS7ZuVuOuGQ=
+=SjXY
-----END PGP SIGNATURE-----
Modified: trunk/libscalar-defer-perl/debian/changelog
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libscalar-defer-perl/debian/changelog?rev=22247&op=diff
==============================================================================
--- trunk/libscalar-defer-perl/debian/changelog (original)
+++ trunk/libscalar-defer-perl/debian/changelog Sat Jun 28 15:12:17 2008
@@ -1,3 +1,13 @@
+libscalar-defer-perl (0.14-2) unstable; urgency=low
+
+ * New upstream release
+ * Standards-Version: 3.8.0 (no changes)
+ * Refresh rules with use debhelper 7: changes in compat, and control
+ * Remove useless README from package
+ * Put copyright format to proposal rev 102, with inc/ copyright
+
+ -- AGOSTINI Yves <agostini at univ-metz.fr> Sat, 28 Jun 2008 16:58:48 +0200
+
libscalar-defer-perl (0.14-1) unstable; urgency=low
* Initial Release (Closes: #476409)
Modified: trunk/libscalar-defer-perl/debian/compat
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libscalar-defer-perl/debian/compat?rev=22247&op=diff
==============================================================================
--- trunk/libscalar-defer-perl/debian/compat (original)
+++ trunk/libscalar-defer-perl/debian/compat Sat Jun 28 15:12:17 2008
@@ -1,1 +1,1 @@
-5
+7
Modified: trunk/libscalar-defer-perl/debian/control
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libscalar-defer-perl/debian/control?rev=22247&op=diff
==============================================================================
--- trunk/libscalar-defer-perl/debian/control (original)
+++ trunk/libscalar-defer-perl/debian/control Sat Jun 28 15:12:17 2008
@@ -1,11 +1,11 @@
Source: libscalar-defer-perl
Section: perl
Priority: optional
-Build-Depends: debhelper (>= 5)
+Build-Depends: debhelper (>= 7)
Build-Depends-Indep: perl (>= 5.6.0), libexporter-lite-perl, libclass-insideout-perl
Maintainer: Debian Perl Group <pkg-perl-maintainers at lists.alioth.debian.org>
Uploaders: AGOSTINI Yves <agostini at univ-metz.fr>, Jaldhar H. Vyas <jaldhar at debian.org>
-Standards-Version: 3.7.3
+Standards-Version: 3.8.0
Homepage: http://search.cpan.org/dist/Scalar-Defer/
Vcs-Svn: svn://svn.debian.org/pkg-perl/trunk/libscalar-defer-perl/
Vcs-Browser: http://svn.debian.org/wsvn/pkg-perl/trunk/libscalar-defer-perl/
Modified: trunk/libscalar-defer-perl/debian/copyright
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libscalar-defer-perl/debian/copyright?rev=22247&op=diff
==============================================================================
--- trunk/libscalar-defer-perl/debian/copyright (original)
+++ trunk/libscalar-defer-perl/debian/copyright Sat Jun 28 15:12:17 2008
@@ -1,13 +1,29 @@
-This is the debian package for the Scalar-Defer module.
+Format-Specification: http://wiki.debian.org/Proposals/CopyrightFormat?action=recall&rev=102
+Debianized-By: AGOSTINI Yves <agostini at univ-metz.fr>
+Debianized-Date: Sat, 28 Jun 2008 17:06:06 +0200
+Original-Source-Location: http://search.cpan.org/dist/Scalar-Defer/
+Upstream-Author: Audrey Tang <cpan at audreyt.org>
-It was downloaded from http://search.cpan.org/dist/Scalar-Defer/
+Files: *
+Copyright: Copyright 2006, 2007, 2008 by Audrey Tang <cpan at audreyt.org>.
+License: MIT
+ This software is released under the MIT license cited below.
-The upstream author is: Audrey Tang <cpan at audreyt.org>.
+Files: inc/*
+Copyright: Copyright 2002 - 2008 by Brian Ingerson, Audrey Tang and Adam Kennedy.
+License: GPL-1+ | Artistic
+ This program is free software; you can redistribute it and/or modify it under
+ the same terms as Perl itself.
+Files: debian/*
+Copyright: Copyright 2008 Debian Perl Group <pkg-perl-maintainers at lists.alioth.debian.org>
+License: MIT
+ The Debian packaging is put under the same terms as the module itself.
-Copyright 2006, 2007, 2008 by Audrey Tang <cpan at audreyt.org>.
-
-This software is released under the MIT license cited below.
+Perl is distributed under your choice of the GNU General Public License or
+the Artistic License. On Debian GNU/Linux systems, the complete text of the
+GNU General Public License can be found in `/usr/share/common-licenses/GPL'
+and the Artistic Licence in `/usr/share/common-licenses/Artistic'.
MIT License:
@@ -28,7 +44,3 @@
LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING
FROM, OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER
DEALINGS IN THE SOFTWARE.
-
-The Debian packaging is (C) 2008, Debian Perl Group
-<pkg-perl-maintainers at lists.alioth.debian.org> and
-is licensed under the same terms as the software itself (see above).
Modified: trunk/libscalar-defer-perl/debian/rules
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libscalar-defer-perl/debian/rules?rev=22247&op=diff
==============================================================================
--- trunk/libscalar-defer-perl/debian/rules (original)
+++ trunk/libscalar-defer-perl/debian/rules Sat Jun 28 15:12:17 2008
@@ -1,63 +1,23 @@
#!/usr/bin/make -f
-# This debian/rules file is provided as a template for normal perl
-# packages. It was created by Marc Brockschmidt <marc at dch-faq.de> for
-# the Debian Perl Group (http://pkg-perl.alioth.debian.org/) but may
-# be used freely wherever it is useful.
-
-# Uncomment this to turn on verbose mode.
-#export DH_VERBOSE=1
-
-# If set to a true value then MakeMaker's prompt function will
-# always return the default without waiting for user input.
-export PERL_MM_USE_DEFAULT=1
-
-PERL ?= /usr/bin/perl
-PACKAGE = $(shell dh_listpackages)
-TMP = $(CURDIR)/debian/$(PACKAGE)
build: build-stamp
build-stamp:
- dh_testdir
- # Add commands to compile the package here
- $(PERL) Makefile.PL INSTALLDIRS=vendor
- $(MAKE)
- $(MAKE) test
+ dh build
touch $@
clean:
- dh_testdir
- dh_testroot
- dh_clean build-stamp install-stamp
- # Add commands to clean up after the build process here
- [ ! -f Makefile ] || $(MAKE) realclean
+ dh $@
install: install-stamp
install-stamp: build-stamp
- dh_testdir
- dh_testroot
- dh_clean -k
- # Add commands to install the package into $(TMP) here
- $(MAKE) install DESTDIR=$(TMP) PREFIX=/usr
- [ ! -d $(TMP)/usr/lib/perl5 ] || \
- rmdir --ignore-fail-on-non-empty --parents --verbose \
- $(TMP)/usr/lib/perl5
+ dh install
touch $@
binary-arch:
-# We have nothing to do here for an architecture-independent package
-binary-indep: build install
- dh_testdir
- dh_testroot
- dh_installdocs README
- dh_installchangelogs Changes
- dh_perl
- dh_compress
- dh_fixperms
- dh_installdeb
- dh_gencontrol
- dh_md5sums
- dh_builddeb
+binary-indep: install
+ dh $@
-binary: binary-indep binary-arch
-.PHONY: build clean binary-indep binary-arch binary install
+binary: binary-arch binary-indep
+
+.PHONY: binary binary-arch binary-indep install clean build
Modified: trunk/libscalar-defer-perl/lib/Scalar/Defer.pm
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libscalar-defer-perl/lib/Scalar/Defer.pm?rev=22247&op=diff
==============================================================================
--- trunk/libscalar-defer-perl/lib/Scalar/Defer.pm (original)
+++ trunk/libscalar-defer-perl/lib/Scalar/Defer.pm Sat Jun 28 15:12:17 2008
@@ -5,7 +5,7 @@
use warnings;
BEGIN {
- our $VERSION = '0.14';
+ our $VERSION = '0.15';
our @EXPORT = qw( lazy defer force );
our @EXPORT_OK = qw( is_deferred );
}
@@ -100,14 +100,21 @@
};
{
- no strict 'refs';
- no warnings 'redefine';
-
- foreach my $sym (keys %UNIVERSAL::) {
- *{$sym} = sub {
- unshift @_, Scalar::Defer::SUB_FORCE()->(shift(@_));
- goto &{$_[0]->can($sym)};
- };
+ foreach my $sym (grep { $_ ne 'DESTROY' } keys %UNIVERSAL::) {
+ my $code = q[
+ sub $sym {
+ if ( defined Scalar::Util::blessed($_[0]) ) {
+ unshift @_, Scalar::Defer::SUB_FORCE()->(shift(@_));
+ goto &{$_[0]->can("$sym")};
+ } else {
+ return shift->SUPER::$sym(@_);
+ }
+ }
+ ];
+
+ $code =~ s/\$sym/$sym/ge;
+
+ eval $code;
}
*DESTROY = \&Scalar::Defer::DESTROY;
Modified: trunk/libscalar-defer-perl/t/01-basic.t
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libscalar-defer-perl/t/01-basic.t?rev=22247&op=diff
==============================================================================
--- trunk/libscalar-defer-perl/t/01-basic.t (original)
+++ trunk/libscalar-defer-perl/t/01-basic.t Sat Jun 28 15:12:17 2008
@@ -1,4 +1,4 @@
-use Test::More tests => 14;
+use Test::More tests => 19;
use ok 'Scalar::Defer';
my ($x, $y);
@@ -27,3 +27,10 @@
is($obj->can('meth'), SomeClass->can('meth'), '->can works too');
ok($obj->isa('SomeClass'), '->isa works too');
is($obj->VERSION, SomeClass->VERSION, '->VERSION works too');
+
+ok( Scalar::Defer->can("can"), "can('can') as a class method" );
+ok( !Scalar::Defer::Deferred->can('blah'), "can('blah') is false as a class method" );
+
+ok( $obj->can("can"), "can('can') as an object method" );
+ok( $obj->can("meth"), "can('meth')");
+ok( !$obj->can('blah'), "can('blah') is false as an object method" );
More information about the Pkg-perl-cvs-commits
mailing list