May 2012 - openSUSE Commits - openSUSE Mailing Lists

commit php5-pear-Horde_Auth for openSUSE:Factory
by root＠hilbert.suse.de 31 May '12

31 May '12

Hello community, here is the log from the commit of package php5-pear-Horde_Auth for openSUSE:Factory checked in at 2012-05-31 17:09:10 ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ Comparing /work/SRC/openSUSE:Factory/php5-pear-Horde_Auth (Old) and /work/SRC/openSUSE:Factory/.php5-pear-Horde_Auth.new (New) ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ Package is "php5-pear-Horde_Auth", Maintainer is "" Changes: -------- --- /work/SRC/openSUSE:Factory/php5-pear-Horde_Auth/php5-pear-Horde_Auth.changes 2012-02-23 15:34:16.000000000 +0100 +++ /work/SRC/openSUSE:Factory/.php5-pear-Horde_Auth.new/php5-pear-Horde_Auth.changes 2012-05-31 17:09:14.000000000 +0200 @@ -1,0 +2,6 @@ +Sun May 20 08:13:25 UTC 2012 - Ralf Lang <lang(a)b1-systems.de> + +- version 1.4.9 +- [jan] Add Finnish translation (Leena Heino <liinu(a)uta.fi>). + +------------------------------------------------------------------- Old: ---- Horde_Auth-1.4.8.tgz New: ---- Horde_Auth-1.4.9.tgz ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ Other differences: ------------------ ++++++ php5-pear-Horde_Auth.spec ++++++ --- /var/tmp/diff_new_pack.3wLk7t/_old 2012-05-31 17:09:15.000000000 +0200 +++ /var/tmp/diff_new_pack.3wLk7t/_new 2012-05-31 17:09:15.000000000 +0200 @@ -17,43 +17,42 @@ # - Name: php5-pear-Horde_Auth %define pear_name Horde_Auth %define pear_sname horde_auth Summary: Horde Authentication API License: LGPL-2.1 Group: Development/Libraries/PHP -Version: 1.4.8 +Version: 1.4.9 Release: 0 Source0: http://pear.horde.org/get/Horde_Auth-%{version}.tgz BuildRoot: %{_tmppath}/%{name}-%{version}-build Url: http://pear.horde.org/package/Horde_Auth BuildRequires: php5-pear >= 1.4.7 -Requires: php5-pear-Horde_Exception < 2.0.0 -Requires: php5-pear-Horde_Util < 2.0.0 +Requires: php5-hash Requires: php5-pear >= 1.7.0 Requires: php5-pear-Horde_Db +Requires: php5-pear-Horde_Exception < 2.0.0 Requires: php5-pear-Horde_Imap_Client +Requires: php5-pear-Horde_Util < 2.0.0 Requires: php5-pear-channel-horde Requires: php5-pear-channel-horde -Requires: php5-hash +BuildRequires: php-macros +BuildRequires: php5-hash BuildRequires: php5-pear-Horde_Db BuildRequires: php5-pear-Horde_Imap_Client BuildRequires: php5-pear-channel-horde -BuildRequires: php5-hash -BuildRequires: php-macros Suggests: php5-sasl Suggests: php5-pam BuildArch: noarch # Fix for renaming (package convention) -Provides: php5-pear-%{pear_sname} = %{version} -Provides: php-pear-%{pear_sname} = %{version} Provides: pear-%{pear_sname} = %{version} -Obsoletes: php5-pear-%{pear_sname} < %{version} -Obsoletes: php-pear-%{pear_sname} < %{version} +Provides: php-pear-%{pear_sname} = %{version} +Provides: php5-pear-%{pear_sname} = %{version} Obsoletes: pear-%{pear_sname} < %{version} +Obsoletes: php-pear-%{pear_sname} < %{version} +Obsoletes: php5-pear-%{pear_sname} < %{version} %description The Horde_Auth package provides a common interface into the various @@ -111,5 +110,10 @@ %files -f %{name}.files -f %{pear_name}.lang %defattr(-,root,root) %{_docdir}/%{name} +%{php_peardir}/Horde/Auth.php +%{php_peardir}/Horde/Auth +%{php_peardir}/data/%{pear_name} +%{php_peardir}/tests/%{pear_name} +%{php_pearxmldir}/%{pear_name}.xml %changelog ++++++ Horde_Auth-1.4.8.tgz -> Horde_Auth-1.4.9.tgz ++++++ ++++ 13431 lines of diff (skipped) -- To unsubscribe, e-mail: opensuse-commit+unsubscribe(a)opensuse.org For additional commands, e-mail: opensuse-commit+help(a)opensuse.org

1 0

commit php5-pear-Horde_ActiveSync for openSUSE:Factory
by root＠hilbert.suse.de 31 May '12

31 May '12

Hello community, here is the log from the commit of package php5-pear-Horde_ActiveSync for openSUSE:Factory checked in at 2012-05-31 17:09:06 ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ Comparing /work/SRC/openSUSE:Factory/php5-pear-Horde_ActiveSync (Old) and /work/SRC/openSUSE:Factory/.php5-pear-Horde_ActiveSync.new (New) ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ Package is "php5-pear-Horde_ActiveSync", Maintainer is "" Changes: -------- --- /work/SRC/openSUSE:Factory/php5-pear-Horde_ActiveSync/php5-pear-Horde_ActiveSync.changes 2012-02-23 15:34:10.000000000 +0100 +++ /work/SRC/openSUSE:Factory/.php5-pear-Horde_ActiveSync.new/php5-pear-Horde_ActiveSync.changes 2012-05-31 17:09:12.000000000 +0200 @@ -1,0 +2,7 @@ +Sun May 20 06:26:16 UTC 2012 - Ralf Lang <lang(a)b1-systems.de> + +- version 1.2.6 +- [mjr] Fix parsing incoming timezones under certain conditions (Bug #11068). +- [jan] Fix class name (software-horde(a)interfasys.ch, Bug #11164). + +------------------------------------------------------------------- Old: ---- Horde_ActiveSync-1.2.4.tgz New: ---- Horde_ActiveSync-1.2.6.tgz ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ Other differences: ------------------ ++++++ php5-pear-Horde_ActiveSync.spec ++++++ --- /var/tmp/diff_new_pack.bXv46L/_old 2012-05-31 17:09:14.000000000 +0200 +++ /var/tmp/diff_new_pack.bXv46L/_new 2012-05-31 17:09:14.000000000 +0200 @@ -24,29 +24,29 @@ Name: php5-pear-Horde_ActiveSync %define pear_name Horde_ActiveSync %define pear_sname horde_activesync -Version: 1.2.4 +Version: 1.2.6 Release: 0 Source0: http://pear.horde.org/get/Horde_ActiveSync-%{version}.tgz BuildRoot: %{_tmppath}/%{name}-%{version}-build Url: http://pear.horde.org/package/Horde_ActiveSync BuildRequires: php5-pear >= 1.7.0 +Requires: php5-pear >= 1.7.0 Requires: php5-pear-Horde_Date < 2.0.0 Requires: php5-pear-Horde_Exception < 2.0.0 Requires: php5-pear-Horde_Support < 2.0.0 Requires: php5-pear-Horde_Util < 2.0.0 -Requires: php5-pear >= 1.7.0 BuildRequires: php5-pear-channel-horde Requires: php5-pear-channel-horde BuildArch: noarch BuildRequires: php-macros # Fix for renaming (package convention) -Provides: php5-pear-%{pear_sname} = %{version} -Provides: php-pear-%{pear_sname} = %{version} Provides: pear-%{pear_sname} = %{version} -Obsoletes: php5-pear-%{pear_sname} < %{version} -Obsoletes: php-pear-%{pear_sname} < %{version} +Provides: php-pear-%{pear_sname} = %{version} +Provides: php5-pear-%{pear_sname} = %{version} Obsoletes: pear-%{pear_sname} < %{version} +Obsoletes: php-pear-%{pear_sname} < %{version} +Obsoletes: php5-pear-%{pear_sname} < %{version} %description This package provides libraries for implementing an ActiveSync server. ++++++ Horde_ActiveSync-1.2.4.tgz -> Horde_ActiveSync-1.2.6.tgz ++++++ ++++ 24987 lines of diff (skipped) -- To unsubscribe, e-mail: opensuse-commit+unsubscribe(a)opensuse.org For additional commands, e-mail: opensuse-commit+help(a)opensuse.org

1 0

commit perl-YAML-LibYAML for openSUSE:Factory
by root＠hilbert.suse.de 31 May '12

31 May '12

Hello community, here is the log from the commit of package perl-YAML-LibYAML for openSUSE:Factory checked in at 2012-05-31 17:09:00 ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ Comparing /work/SRC/openSUSE:Factory/perl-YAML-LibYAML (Old) and /work/SRC/openSUSE:Factory/.perl-YAML-LibYAML.new (New) ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ Package is "perl-YAML-LibYAML", Maintainer is "" Changes: -------- --- /work/SRC/openSUSE:Factory/perl-YAML-LibYAML/perl-YAML-LibYAML.changes 2012-05-03 10:59:40.000000000 +0200 +++ /work/SRC/openSUSE:Factory/.perl-YAML-LibYAML.new/perl-YAML-LibYAML.changes 2012-05-31 17:09:03.000000000 +0200 @@ -1,0 +2,6 @@ +Wed May 30 07:57:03 UTC 2012 - coolo(a)suse.com + +- updated to 0.38 + - Apply SPROUT++ deparse test patch. Thanks! + +------------------------------------------------------------------- Old: ---- YAML-LibYAML-0.37.tar.gz New: ---- YAML-LibYAML-0.38.tar.gz ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ Other differences: ------------------ ++++++ perl-YAML-LibYAML.spec ++++++ --- /var/tmp/diff_new_pack.jXCi2k/_old 2012-05-31 17:09:04.000000000 +0200 +++ /var/tmp/diff_new_pack.jXCi2k/_new 2012-05-31 17:09:04.000000000 +0200 @@ -17,15 +17,14 @@ Name: perl-YAML-LibYAML -Version: 0.37 +Version: 0.38 Release: 0 %define cpan_name YAML-LibYAML Summary: YAML::LibYAML Perl module License: GPL-1.0+ or Artistic-1.0 Group: Development/Libraries/Perl Url: http://search.cpan.org/dist/YAML-LibYAML/ -#Source: http://www.cpan.org/authors/id/I/IN/INGY/YAML-LibYAML-%{version}.tar.gz -Source: %{cpan_name}-%{version}.tar.gz +Source: http://www.cpan.org/authors/id/I/IN/INGY/%{cpan_name}-%{version}.tar.gz Patch1: CVE-2012-1152-YAML-LibYAML-0.35-format-error.patch BuildRoot: %{_tmppath}/%{name}-%{version}-build BuildRequires: perl @@ -59,9 +58,6 @@ %perl_process_packlist %perl_gen_filelist -%clean -%{__rm} -rf %{buildroot} - %files -f %{name}.files %defattr(644,root,root,755) %doc Changes README ++++++ YAML-LibYAML-0.37.tar.gz -> YAML-LibYAML-0.38.tar.gz ++++++ diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/YAML-LibYAML-0.37/Changes new/YAML-LibYAML-0.38/Changes --- old/YAML-LibYAML-0.37/Changes 2011-09-29 20:10:08.000000000 +0200 +++ new/YAML-LibYAML-0.38/Changes 2012-01-04 07:56:39.000000000 +0100 @@ -1,4 +1,9 @@ --- +version: 0.38 +date: Tue Jan 3 22:56:01 PST 2012 +changes: +- Apply SPROUT++ deparse test patch. Thanks! +--- version: 0.37 date: Thu Sep 29 20:09:20 CEST 2011 changes: diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/YAML-LibYAML-0.37/LICENSE new/YAML-LibYAML-0.38/LICENSE --- old/YAML-LibYAML-0.37/LICENSE 2011-09-29 20:10:08.000000000 +0200 +++ new/YAML-LibYAML-0.38/LICENSE 2012-01-04 07:56:39.000000000 +0100 @@ -1,4 +1,4 @@ -This software is copyright (c) 2011 by Ingy döt Net <ingy(a)cpan.org>. +This software is copyright (c) 2012 by Ingy döt Net <ingy(a)cpan.org>. This is free software; you can redistribute it and/or modify it under the same terms as the Perl 5 programming language system itself. @@ -12,21 +12,22 @@ --- The GNU General Public License, Version 1, February 1989 --- -This software is Copyright (c) 2011 by Ingy döt Net <ingy(a)cpan.org>. +This software is Copyright (c) 2012 by Ingy döt Net <ingy(a)cpan.org>. This is free software, licensed under: The GNU General Public License, Version 1, February 1989 - GNU GENERAL PUBLIC LICENSE - Version 1, February 1989 + GNU GENERAL PUBLIC LICENSE + Version 1, February 1989 Copyright (C) 1989 Free Software Foundation, Inc. - 59 Temple Place, Suite 330, Boston, MA 02111-1307, USA + 51 Franklin St, Fifth Floor, Boston, MA 02110-1301 USA + Everyone is permitted to copy and distribute verbatim copies of this license document, but changing it is not allowed. - Preamble + Preamble The license agreements of most software companies try to keep users at the mercy of those companies. By contrast, our General Public @@ -67,7 +68,7 @@ The precise terms and conditions for copying, distribution and modification follow. - GNU GENERAL PUBLIC LICENSE + GNU GENERAL PUBLIC LICENSE TERMS AND CONDITIONS FOR COPYING, DISTRIBUTION AND MODIFICATION 0. This License Agreement applies to any program or other work which @@ -185,7 +186,7 @@ of preserving the free status of all derivatives of our free software and of promoting the sharing and reuse of software generally. - NO WARRANTY + NO WARRANTY 9. BECAUSE THE PROGRAM IS LICENSED FREE OF CHARGE, THERE IS NO WARRANTY FOR THE PROGRAM, TO THE EXTENT PERMITTED BY APPLICABLE LAW. EXCEPT WHEN @@ -207,9 +208,9 @@ PROGRAMS), EVEN IF SUCH HOLDER OR OTHER PARTY HAS BEEN ADVISED OF THE POSSIBILITY OF SUCH DAMAGES. - END OF TERMS AND CONDITIONS + END OF TERMS AND CONDITIONS - Appendix: How to Apply These Terms to Your New Programs + Appendix: How to Apply These Terms to Your New Programs If you develop a new program, and you want it to be of the greatest possible use to humanity, the best way to achieve this is to make it @@ -235,8 +236,9 @@ GNU General Public License for more details. You should have received a copy of the GNU General Public License - along with this program; if not, write to the Free Software Foundation, - Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307, USA. + along with this program; if not, write to the Free Software + Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston MA 02110-1301 USA + Also add information on how to contact you by electronic and paper mail. @@ -270,7 +272,7 @@ --- The Artistic License 1.0 --- -This software is Copyright (c) 2011 by Ingy döt Net <ingy(a)cpan.org>. +This software is Copyright (c) 2012 by Ingy döt Net <ingy(a)cpan.org>. This is free software, licensed under: diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/YAML-LibYAML-0.37/LibYAML/Makefile new/YAML-LibYAML-0.38/LibYAML/Makefile --- old/YAML-LibYAML-0.37/LibYAML/Makefile 2011-09-29 20:10:09.000000000 +0200 +++ new/YAML-LibYAML-0.38/LibYAML/Makefile 2012-01-04 07:56:40.000000000 +0100 @@ -1,7 +1,7 @@ # This Makefile is for the YAML::XS::LibYAML extension to perl. # # It was generated automatically by MakeMaker version -# 6.56 (Revision: 65600) from the contents of +# 6.62 (Revision: 66200) from the contents of # Makefile.PL. Don't edit this file, edit Makefile.PL instead. # # ANY CHANGES MADE HERE WILL BE LOST! @@ -12,8 +12,9 @@ # MakeMaker Parameters: # ABSTRACT_FROM => q[lib/YAML/XS/LibYAML.pm] -# AUTHOR => q[Ingy döt Net <ingy(a)cpan.org>] +# AUTHOR => [q[Ingy döt Net <ingy(a)cpan.org>]] # BUILD_REQUIRES => { } +# CONFIGURE_REQUIRES => { } # DEFINE => q[-DHAVE_CONFIG_H] # INC => q[-I.] # LIBS => [q[]] @@ -26,7 +27,7 @@ # --- MakeMaker const_config section: -# These definitions are from config.sh (via /usr/lib/perl/5.10/Config.pm). +# These definitions are from config.sh (via /usr/lib/perl/5.12/Config.pm). # They may have been overridden via Makefile.PL or on the command line. AR = ar CC = cc @@ -43,10 +44,10 @@ LIB_EXT = .a OBJ_EXT = .o OSNAME = linux -OSVERS = 2.6.24-27-server +OSVERS = 2.6.24-28-server RANLIB = : -SITELIBEXP = /usr/local/share/perl/5.10.1 -SITEARCHEXP = /usr/local/lib/perl/5.10.1 +SITELIBEXP = /usr/local/share/perl/5.12.4 +SITEARCHEXP = /usr/local/lib/perl/5.12.4 SO = so VENDORARCHEXP = /usr/lib/perl5 VENDORLIBEXP = /usr/share/perl5 @@ -79,15 +80,15 @@ PERLPREFIX = /usr SITEPREFIX = /usr/local VENDORPREFIX = /usr -INSTALLPRIVLIB = /usr/share/perl/5.10 +INSTALLPRIVLIB = /usr/share/perl/5.12 DESTINSTALLPRIVLIB = $(DESTDIR)$(INSTALLPRIVLIB) -INSTALLSITELIB = /usr/local/share/perl/5.10.1 +INSTALLSITELIB = /usr/local/share/perl/5.12.4 DESTINSTALLSITELIB = $(DESTDIR)$(INSTALLSITELIB) INSTALLVENDORLIB = /usr/share/perl5 DESTINSTALLVENDORLIB = $(DESTDIR)$(INSTALLVENDORLIB) -INSTALLARCHLIB = /usr/lib/perl/5.10 +INSTALLARCHLIB = /usr/lib/perl/5.12 DESTINSTALLARCHLIB = $(DESTDIR)$(INSTALLARCHLIB) -INSTALLSITEARCH = /usr/local/lib/perl/5.10.1 +INSTALLSITEARCH = /usr/local/lib/perl/5.12.4 DESTINSTALLSITEARCH = $(DESTDIR)$(INSTALLSITEARCH) INSTALLVENDORARCH = /usr/lib/perl5 DESTINSTALLVENDORARCH = $(DESTDIR)$(INSTALLVENDORARCH) @@ -115,14 +116,14 @@ DESTINSTALLSITEMAN3DIR = $(DESTDIR)$(INSTALLSITEMAN3DIR) INSTALLVENDORMAN3DIR = /usr/share/man/man3 DESTINSTALLVENDORMAN3DIR = $(DESTDIR)$(INSTALLVENDORMAN3DIR) -PERL_LIB = /usr/share/perl/5.10 -PERL_ARCHLIB = /usr/lib/perl/5.10 +PERL_LIB = /usr/share/perl/5.12 +PERL_ARCHLIB = /usr/lib/perl/5.12 LIBPERL_A = libperl.a FIRST_MAKEFILE = Makefile MAKEFILE_OLD = Makefile.old MAKE_APERL_FILE = Makefile.aperl PERLMAINCC = $(CC) -PERL_INC = /usr/lib/perl/5.10/CORE +PERL_INC = /usr/lib/perl/5.12/CORE PERL = /usr/bin/perl FULLPERL = /usr/bin/perl ABSPERL = $(PERL) @@ -137,9 +138,9 @@ PERM_RW = 644 PERM_RWX = 755 -MAKEMAKER = /usr/share/perl/5.10/ExtUtils/MakeMaker.pm -MM_VERSION = 6.56 -MM_REVISION = 65600 +MAKEMAKER = /usr/share/perl/5.12/ExtUtils/MakeMaker.pm +MM_VERSION = 6.62 +MM_REVISION = 66200 # FULLEXT = Pathname for extension directory (eg Foo/Bar/Oracle). # BASEEXT = Basename part of FULLEXT. May be just equal FULLEXT. (eg Oracle) @@ -216,7 +217,7 @@ # --- MakeMaker platform_constants section: -MM_Unix_VERSION = 6.56 +MM_Unix_VERSION = 6.62 PERL_MALLOC_DEF = -DPERL_EXTMALLOC_DEF -Dmalloc=Perl_malloc -Dfree=Perl_mfree -Drealloc=Perl_realloc -Dcalloc=Perl_calloc @@ -228,12 +229,12 @@ # --- MakeMaker tool_xsubpp section: -XSUBPPDIR = /usr/share/perl/5.10.1/ExtUtils +XSUBPPDIR = /usr/share/perl/5.12.4/ExtUtils XSUBPP = $(XSUBPPDIR)$(DFSEP)xsubpp XSUBPPRUN = $(PERLRUN) $(XSUBPP) XSPROTOARG = -XSUBPPDEPS = /usr/share/perl/5.10/ExtUtils/typemap $(XSUBPP) -XSUBPPARGS = -typemap /usr/share/perl/5.10/ExtUtils/typemap +XSUBPPDEPS = /usr/share/perl/5.12/ExtUtils/typemap $(XSUBPP) +XSUBPPARGS = -typemap /usr/share/perl/5.12/ExtUtils/typemap XSUBPP_EXTRA_ARGS = @@ -540,15 +541,16 @@ *$(LIB_EXT) core \ core.[0-9] $(INST_ARCHAUTODIR)/extralibs.all \ core.[0-9][0-9] $(BASEEXT).bso \ - pm_to_blib.ts core.[0-9][0-9][0-9][0-9] \ + pm_to_blib.ts MYMETA.json \ + core.[0-9][0-9][0-9][0-9] MYMETA.yml \ $(BASEEXT).x $(BOOTSTRAP) \ perl$(EXE_EXT) tmon.out \ *$(OBJ_EXT) pm_to_blib \ $(INST_ARCHAUTODIR)/extralibs.ld blibdirs.ts \ LibYAML.c core.[0-9][0-9][0-9][0-9][0-9] \ *perl.core core.*perl.*.? \ - $(MAKE_APERL_FILE) perl \ - $(BASEEXT).def core.[0-9][0-9][0-9] \ + $(MAKE_APERL_FILE) $(BASEEXT).def \ + perl core.[0-9][0-9][0-9] \ mon.out lib$(BASEEXT).def \ perlmain.c perl.exe \ so_locations $(BASEEXT).exp @@ -573,30 +575,8 @@ # --- MakeMaker metafile section: -metafile : create_distdir - $(NOECHO) $(ECHO) Generating META.yml - $(NOECHO) $(ECHO) '--- #YAML:1.0' > META_new.yml - $(NOECHO) $(ECHO) 'name: YAML-XS-LibYAML' >> META_new.yml - $(NOECHO) $(ECHO) 'version: ' >> META_new.yml - $(NOECHO) $(ECHO) 'abstract: An XS Wrapper Module of libyaml' >> META_new.yml - $(NOECHO) $(ECHO) 'author:' >> META_new.yml - $(NOECHO) $(ECHO) ' - Ingy döt Net <ingy(a)cpan.org>' >> META_new.yml - $(NOECHO) $(ECHO) 'license: unknown' >> META_new.yml - $(NOECHO) $(ECHO) 'distribution_type: module' >> META_new.yml - $(NOECHO) $(ECHO) 'configure_requires:' >> META_new.yml - $(NOECHO) $(ECHO) ' ExtUtils::MakeMaker: 0' >> META_new.yml - $(NOECHO) $(ECHO) 'build_requires:' >> META_new.yml - $(NOECHO) $(ECHO) ' ExtUtils::MakeMaker: 0' >> META_new.yml - $(NOECHO) $(ECHO) 'requires: {}' >> META_new.yml - $(NOECHO) $(ECHO) 'no_index:' >> META_new.yml - $(NOECHO) $(ECHO) ' directory:' >> META_new.yml - $(NOECHO) $(ECHO) ' - t' >> META_new.yml - $(NOECHO) $(ECHO) ' - inc' >> META_new.yml - $(NOECHO) $(ECHO) 'generated_by: ExtUtils::MakeMaker version 6.56' >> META_new.yml - $(NOECHO) $(ECHO) 'meta-spec:' >> META_new.yml - $(NOECHO) $(ECHO) ' url: http://module-build.sourceforge.net/META-spec-v1.4.html' >> META_new.yml - $(NOECHO) $(ECHO) ' version: 1.4' >> META_new.yml - -$(NOECHO) $(MV) META_new.yml $(DISTVNAME)/META.yml +metafile : + $(NOECHO) $(NOOP) # --- MakeMaker signature section: @@ -616,8 +596,12 @@ # --- MakeMaker distmeta section: distmeta : create_distdir metafile - $(NOECHO) cd $(DISTVNAME) && $(ABSPERLRUN) -MExtUtils::Manifest=maniadd -e 'eval { maniadd({q{META.yml} => q{Module meta-data (added by MakeMaker)}}) } ' \ + $(NOECHO) cd $(DISTVNAME) && $(ABSPERLRUN) -MExtUtils::Manifest=maniadd -e 'exit unless -e q{META.yml};' \ + -e 'eval { maniadd({q{META.yml} => q{Module YAML meta-data (added by MakeMaker)}}) }' \ -e ' or print "Could not add META.yml to MANIFEST: $${'\''@'\''}\n"' -- + $(NOECHO) cd $(DISTVNAME) && $(ABSPERLRUN) -MExtUtils::Manifest=maniadd -e 'exit unless -f q{META.json};' \ + -e 'eval { maniadd({q{META.json} => q{Module JSON meta-data (added by MakeMaker)}}) }' \ + -e ' or print "Could not add META.json to MANIFEST: $${'\''@'\''}\n"' -- @@ -645,7 +629,6 @@ $(PERL_INC)/INTERN.h \ $(PERL_INC)/XSUB.h \ $(PERL_INC)/av.h \ - $(PERL_INC)/cc_runtime.h \ $(PERL_INC)/config.h \ $(PERL_INC)/cop.h \ $(PERL_INC)/cv.h \ @@ -753,7 +736,7 @@ $(NOECHO) $(ECHO) ' <ABSTRACT>An XS Wrapper Module of libyaml</ABSTRACT>' >> $(DISTNAME).ppd $(NOECHO) $(ECHO) ' <AUTHOR>Ingy döt Net <ingy(a)cpan.org></AUTHOR>' >> $(DISTNAME).ppd $(NOECHO) $(ECHO) ' <IMPLEMENTATION>' >> $(DISTNAME).ppd - $(NOECHO) $(ECHO) ' <ARCHITECTURE NAME="i686-linux-gnu-thread-multi-5.10" />' >> $(DISTNAME).ppd + $(NOECHO) $(ECHO) ' <ARCHITECTURE NAME="i686-linux-gnu-thread-multi-64int-5.12" />' >> $(DISTNAME).ppd $(NOECHO) $(ECHO) ' <CODEBASE HREF="" />' >> $(DISTNAME).ppd $(NOECHO) $(ECHO) ' </IMPLEMENTATION>' >> $(DISTNAME).ppd $(NOECHO) $(ECHO) '</SOFTPKG>' >> $(DISTNAME).ppd diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/YAML-LibYAML-0.37/MANIFEST new/YAML-LibYAML-0.38/MANIFEST --- old/YAML-LibYAML-0.37/MANIFEST 2011-09-29 20:10:09.000000000 +0200 +++ new/YAML-LibYAML-0.38/MANIFEST 2012-01-04 07:56:41.000000000 +0100 @@ -63,6 +63,7 @@ t/leak.t t/load.t t/loadfile-empty.t +t/long_plain_wrap.t t/magic.t t/native.t t/null.t diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/YAML-LibYAML-0.37/META.yml new/YAML-LibYAML-0.38/META.yml --- old/YAML-LibYAML-0.37/META.yml 2011-09-29 20:10:09.000000000 +0200 +++ new/YAML-LibYAML-0.38/META.yml 2012-01-04 07:56:40.000000000 +0100 @@ -7,7 +7,7 @@ configure_requires: ExtUtils::MakeMaker: 6.42 distribution_type: module -generated_by: 'Module::Install version 1.01' +generated_by: 'Module::Install version 1.02' license: perl meta-spec: url: http://module-build.sourceforge.net/META-spec-v1.4.html @@ -21,7 +21,10 @@ Filter::Util::Call: 0 perl: 5.8.1 resources: - homepage: http://github.com/ingydotnet/yaml-libyaml-pm/tree + homepage: https://github.com/ingydotnet/yaml-libyaml-pm/tree license: http://dev.perl.org/licenses/ - repository: git://github.com/ingydotnet/yaml-libyaml-pm.git -version: 0.37 + repository: + type: git + url: git://github.com/ingydotnet/yaml-libyaml-pm.git + web: https://github.com/ingydotnet/yaml-libyaml-pm/tree +version: 0.38 diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/YAML-LibYAML-0.37/inc/Module/Install/Base.pm new/YAML-LibYAML-0.38/inc/Module/Install/Base.pm --- old/YAML-LibYAML-0.37/inc/Module/Install/Base.pm 2011-09-29 20:10:08.000000000 +0200 +++ new/YAML-LibYAML-0.38/inc/Module/Install/Base.pm 2012-01-04 07:56:39.000000000 +0100 @@ -4,7 +4,7 @@ use strict 'vars'; use vars qw{$VERSION}; BEGIN { - $VERSION = '1.01'; + $VERSION = '1.02'; } # Suspend handler for "redefined" warnings diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/YAML-LibYAML-0.37/inc/Module/Install/Can.pm new/YAML-LibYAML-0.38/inc/Module/Install/Can.pm --- old/YAML-LibYAML-0.37/inc/Module/Install/Can.pm 2011-09-29 20:10:08.000000000 +0200 +++ new/YAML-LibYAML-0.38/inc/Module/Install/Can.pm 2012-01-04 07:56:39.000000000 +0100 @@ -9,7 +9,7 @@ use vars qw{$VERSION @ISA $ISCORE}; BEGIN { - $VERSION = '1.01'; + $VERSION = '1.02'; @ISA = 'Module::Install::Base'; $ISCORE = 1; } diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/YAML-LibYAML-0.37/inc/Module/Install/Fetch.pm new/YAML-LibYAML-0.38/inc/Module/Install/Fetch.pm --- old/YAML-LibYAML-0.37/inc/Module/Install/Fetch.pm 2011-09-29 20:10:09.000000000 +0200 +++ new/YAML-LibYAML-0.38/inc/Module/Install/Fetch.pm 2012-01-04 07:56:40.000000000 +0100 @@ -6,7 +6,7 @@ use vars qw{$VERSION @ISA $ISCORE}; BEGIN { - $VERSION = '1.01'; + $VERSION = '1.02'; @ISA = 'Module::Install::Base'; $ISCORE = 1; } diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/YAML-LibYAML-0.37/inc/Module/Install/GithubMeta.pm new/YAML-LibYAML-0.38/inc/Module/Install/GithubMeta.pm --- old/YAML-LibYAML-0.37/inc/Module/Install/GithubMeta.pm 2011-09-29 20:10:08.000000000 +0200 +++ new/YAML-LibYAML-0.38/inc/Module/Install/GithubMeta.pm 2012-01-04 07:56:39.000000000 +0100 @@ -7,20 +7,27 @@ use base qw(Module::Install::Base); use vars qw($VERSION); -$VERSION = '0.10'; +$VERSION = '0.16'; sub githubmeta { my $self = shift; return unless $Module::Install::AUTHOR; return unless _under_git(); return unless $self->can_run('git'); - return unless my ($git_url) = `git remote show -n origin` =~ /URL: (.*)$/m; + my $remote = shift || 'origin'; + return unless my ($git_url) = `git remote show -n $remote` =~ /URL: (.*)$/m; return unless $git_url =~ /github\.com/; # Not a Github repository my $http_url = $git_url; $git_url =~ s![\w\-]+\@([^:]+):!git://$1/!; - $http_url =~ s![\w\-]+\@([^:]+):!http://$1/!; + $http_url =~ s![\w\-]+\@([^:]+):!https://$1/!; $http_url =~ s!\.git$!/tree!; - $self->repository( $git_url ); + $self->repository( + { + type => 'git', + url => $git_url, + web => $http_url, + }, + ); $self->homepage( $http_url ) unless $self->homepage(); return 1; } @@ -47,4 +54,4 @@ 'Github'; __END__ -#line 108 +#line 117 diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/YAML-LibYAML-0.37/inc/Module/Install/Include.pm new/YAML-LibYAML-0.38/inc/Module/Install/Include.pm --- old/YAML-LibYAML-0.37/inc/Module/Install/Include.pm 2011-09-29 20:10:08.000000000 +0200 +++ new/YAML-LibYAML-0.38/inc/Module/Install/Include.pm 2012-01-04 07:56:39.000000000 +0100 @@ -6,7 +6,7 @@ use vars qw{$VERSION @ISA $ISCORE}; BEGIN { - $VERSION = '1.01'; + $VERSION = '1.02'; @ISA = 'Module::Install::Base'; $ISCORE = 1; } diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/YAML-LibYAML-0.37/inc/Module/Install/Makefile.pm new/YAML-LibYAML-0.38/inc/Module/Install/Makefile.pm --- old/YAML-LibYAML-0.37/inc/Module/Install/Makefile.pm 2011-09-29 20:10:08.000000000 +0200 +++ new/YAML-LibYAML-0.38/inc/Module/Install/Makefile.pm 2012-01-04 07:56:39.000000000 +0100 @@ -8,7 +8,7 @@ use vars qw{$VERSION @ISA $ISCORE}; BEGIN { - $VERSION = '1.01'; + $VERSION = '1.02'; @ISA = 'Module::Install::Base'; $ISCORE = 1; } diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/YAML-LibYAML-0.37/inc/Module/Install/Metadata.pm new/YAML-LibYAML-0.38/inc/Module/Install/Metadata.pm --- old/YAML-LibYAML-0.37/inc/Module/Install/Metadata.pm 2011-09-29 20:10:08.000000000 +0200 +++ new/YAML-LibYAML-0.38/inc/Module/Install/Metadata.pm 2012-01-04 07:56:39.000000000 +0100 @@ -6,7 +6,7 @@ use vars qw{$VERSION @ISA $ISCORE}; BEGIN { - $VERSION = '1.01'; + $VERSION = '1.02'; @ISA = 'Module::Install::Base'; $ISCORE = 1; } diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/YAML-LibYAML-0.37/inc/Module/Install/Package.pm new/YAML-LibYAML-0.38/inc/Module/Install/Package.pm --- old/YAML-LibYAML-0.37/inc/Module/Install/Package.pm 2011-09-29 20:10:08.000000000 +0200 +++ new/YAML-LibYAML-0.38/inc/Module/Install/Package.pm 2012-01-04 07:56:39.000000000 +0100 @@ -16,7 +16,7 @@ use Module::Install::Base; use vars qw'@ISA $VERSION'; @ISA = 'Module::Install::Base'; -$VERSION = '0.29'; +$VERSION = '0.30'; #-----------------------------------------------------------------------------# # XXX BOOTBUGHACK @@ -54,6 +54,7 @@ # plugin directive: my $module_install_plugin; my $module_package_plugin; +my $module_package_dist_plugin; # XXX ARGVHACK This @argv thing is a temporary fix for an ugly bug somewhere in the # Wikitext module usage. my @argv; @@ -67,6 +68,10 @@ $module_package_plugin->mi($module_install_plugin); $module_package_plugin->version_check($VERSION); } + else { + $module_package_dist_plugin = $self->_load_dist_plugin($plugin_spec); + $module_package_dist_plugin->mi($module_install_plugin) if ref $module_package_dist_plugin; + } # NOTE - This is the point in time where the body of Makefile.PL runs... return; @@ -80,7 +85,9 @@ } else { $module_install_plugin->_initial(); + $module_package_dist_plugin->_initial() if ref $module_package_dist_plugin; $module_install_plugin->_main(); + $module_package_dist_plugin->_main() if ref $module_package_dist_plugin; } }; if ($@) { @@ -101,7 +108,10 @@ $module_package_plugin->final; $module_package_plugin->replicate_module_package; } - : $module_install_plugin->_final; + : do { + $module_install_plugin->_final; + $module_package_dist_plugin->_final() if ref $module_package_dist_plugin; + } } } @@ -123,8 +133,9 @@ # Find and load the author side plugin: sub _load_plugin { - my ($self, $spec) = @_; + my ($self, $spec, $namespace) = @_; $spec ||= ''; + $namespace ||= 'Module::Package'; my $version = ''; $Module::Package::plugin_version = 0; if ($spec =~ s/\s+(\S+)\s*//) { @@ -137,12 +148,22 @@ ($spec =~ /^:(\w+)$/) ? ('Plugin', "Plugin::$1") : ($spec =~ /^(\S*\w):(\w+)$/) ? ($1, "$1::$2") : die "$spec is invalid"; - $module = "Module::Package::$module"; - $plugin = "Module::Package::$plugin"; + $module = "${namespace}::${module}"; + $plugin = "${namespace}::${plugin}"; eval "use $module $version (); 1" or die $@; return $plugin->new(); } +# Find and load the user side plugin: +sub _load_dist_plugin { + my ($self, $spec, $namespace) = @_; + $spec ||= ''; + $namespace ||= 'Module::Package::Dist'; + my $r = eval { $self->_load_plugin($spec, $namespace); }; + return $r if ref $r; + return; +} + #-----------------------------------------------------------------------------# # These are the user side analogs to the author side plugin API calls. # Prefix with '_' to not pollute Module::Install plugin space. @@ -218,6 +239,32 @@ $self->WriteAll(@_); } +# Base package for Module::Package plugin distributed components. +package Module::Package::Dist; + +sub new { + my ($class, %args) = @_; + bless \%args, $class; +} + +sub mi { + @_ > 1 ? ($_[0]->{mi}=$_[1]) : $_[0]->{mi}; +} + +sub _initial { + my ($self) = @_; +} + +sub _main { + my ($self) = @_; +} + +sub _final { + my ($self) = @_; +} + +1; + #-----------------------------------------------------------------------------# # Take a guess at the primary .pm and .pod files for 'all_from', and friends. # Put them in global magical vars in the main:: namespace. diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/YAML-LibYAML-0.37/inc/Module/Install/Win32.pm new/YAML-LibYAML-0.38/inc/Module/Install/Win32.pm --- old/YAML-LibYAML-0.37/inc/Module/Install/Win32.pm 2011-09-29 20:10:09.000000000 +0200 +++ new/YAML-LibYAML-0.38/inc/Module/Install/Win32.pm 2012-01-04 07:56:40.000000000 +0100 @@ -6,7 +6,7 @@ use vars qw{$VERSION @ISA $ISCORE}; BEGIN { - $VERSION = '1.01'; + $VERSION = '1.02'; @ISA = 'Module::Install::Base'; $ISCORE = 1; } diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/YAML-LibYAML-0.37/inc/Module/Install/WriteAll.pm new/YAML-LibYAML-0.38/inc/Module/Install/WriteAll.pm --- old/YAML-LibYAML-0.37/inc/Module/Install/WriteAll.pm 2011-09-29 20:10:09.000000000 +0200 +++ new/YAML-LibYAML-0.38/inc/Module/Install/WriteAll.pm 2012-01-04 07:56:40.000000000 +0100 @@ -6,7 +6,7 @@ use vars qw{$VERSION @ISA $ISCORE}; BEGIN { - $VERSION = '1.01'; + $VERSION = '1.02'; @ISA = qw{Module::Install::Base}; $ISCORE = 1; } diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/YAML-LibYAML-0.37/inc/Module/Install.pm new/YAML-LibYAML-0.38/inc/Module/Install.pm --- old/YAML-LibYAML-0.37/inc/Module/Install.pm 2011-09-29 20:10:08.000000000 +0200 +++ new/YAML-LibYAML-0.38/inc/Module/Install.pm 2012-01-04 07:56:39.000000000 +0100 @@ -31,7 +31,7 @@ # This is not enforced yet, but will be some time in the next few # releases once we can make sure it won't clash with custom # Module::Install extensions. - $VERSION = '1.01'; + $VERSION = '1.02'; # Storage for the pseudo-singleton $MAIN = undef; diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/YAML-LibYAML-0.37/inc/Module/Package.pm new/YAML-LibYAML-0.38/inc/Module/Package.pm --- old/YAML-LibYAML-0.37/inc/Module/Package.pm 2011-09-29 20:10:09.000000000 +0200 +++ new/YAML-LibYAML-0.38/inc/Module/Package.pm 2012-01-04 07:56:40.000000000 +0100 @@ -15,7 +15,7 @@ use strict; BEGIN { - $Module::Package::VERSION = '0.29'; + $Module::Package::VERSION = '0.30'; $inc::Module::Package::VERSION ||= $Module::Package::VERSION; @inc::Module::Package::ISA = __PACKAGE__; } diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/YAML-LibYAML-0.37/lib/YAML/XS.pm new/YAML-LibYAML-0.38/lib/YAML/XS.pm --- old/YAML-LibYAML-0.37/lib/YAML/XS.pm 2011-09-29 20:08:07.000000000 +0200 +++ new/YAML-LibYAML-0.38/lib/YAML/XS.pm 2012-01-04 07:51:19.000000000 +0100 @@ -2,7 +2,7 @@ use strict; package YAML::XS; -$YAML::XS::VERSION = '0.37'; +$YAML::XS::VERSION = '0.38'; use base 'Exporter'; @YAML::XS::EXPORT = qw(Load Dump); diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/YAML-LibYAML-0.37/t/code.t new/YAML-LibYAML-0.38/t/code.t --- old/YAML-LibYAML-0.37/t/code.t 2011-04-03 18:28:08.000000000 +0200 +++ new/YAML-LibYAML-0.38/t/code.t 2012-01-04 07:52:00.000000000 +0100 @@ -18,11 +18,17 @@ --- !!perl/code:Barry::White |- { use warnings; - use strict 'refs'; + use strict; print "Bye.\n"; } ... +use B::Deparse; +if (new B::Deparse -> coderef2text ( sub { no strict; 1; use strict; 1; }) + =~ 'refs') { + $yaml =~ s/use strict/use strict 'refs'/g; +} + $YAML::XS::DumpCode = 1; is Dump($sub), $yaml, "Dumping a blessed code ref works (with B::Deparse)"; diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/YAML-LibYAML-0.37/t/long_plain_wrap.t new/YAML-LibYAML-0.38/t/long_plain_wrap.t --- old/YAML-LibYAML-0.37/t/long_plain_wrap.t 1970-01-01 01:00:00.000000000 +0100 +++ new/YAML-LibYAML-0.38/t/long_plain_wrap.t 2012-01-04 07:55:42.000000000 +0100 @@ -0,0 +1,12 @@ +use Test::More; # tests => 1; + +use YAML::XS; + +plan skip_all => 'Failing test. Not yet implemented'; + +my $p = {my_key => "When foo or foobar is used, everyone understands that these are just examples, and they dont really exist."}; +my $e = <<'...'; +--- +my_key: When foo or foobar is used, everyone understands that these are just examples, and they dont really exist. +... +is Dump($p), $e, "Long plain scalars don't wrap"; -- To unsubscribe, e-mail: opensuse-commit+unsubscribe(a)opensuse.org For additional commands, e-mail: opensuse-commit+help(a)opensuse.org

1 0

commit perl-Want for openSUSE:Factory
by root＠hilbert.suse.de 31 May '12

31 May '12

Hello community, here is the log from the commit of package perl-Want for openSUSE:Factory checked in at 2012-05-31 17:08:56 ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ Comparing /work/SRC/openSUSE:Factory/perl-Want (Old) and /work/SRC/openSUSE:Factory/.perl-Want.new (New) ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ Package is "perl-Want", Maintainer is "" Changes: -------- --- /work/SRC/openSUSE:Factory/perl-Want/perl-Want.changes 2011-09-23 12:39:23.000000000 +0200 +++ /work/SRC/openSUSE:Factory/.perl-Want.new/perl-Want.changes 2012-05-31 17:08:57.000000000 +0200 @@ -1,0 +2,13 @@ +Wed May 30 08:24:07 UTC 2012 - coolo(a)suse.com + +- updated to 0.21 + - Change tests to avoid the new warning 'Useless assignment to a temporary' added in 5.15. + + - Remove a test that was testing the behaviour of perl, rather than of this module, + and was testing an aspect of perl’s behaviour that has changed (bf8fb5ebd) in + in such a way that the test was failing with bleadperl. + + - Avoid leaking the RHS of an lnoreturn lvalue sub, thanks to Father Chrysostomos + https://rt.cpan.org/Public/Bug/Display.html?id=72083 + +------------------------------------------------------------------- Old: ---- Want-0.18.tar.gz New: ---- Want-0.21.tar.gz ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ Other differences: ------------------ ++++++ perl-Want.spec ++++++ --- /var/tmp/diff_new_pack.Iq0dsZ/_old 2012-05-31 17:08:59.000000000 +0200 +++ /var/tmp/diff_new_pack.Iq0dsZ/_new 2012-05-31 17:08:59.000000000 +0200 @@ -1,7 +1,7 @@ # # spec file for package perl-Want # -# Copyright (c) 2011 SUSE LINUX Products GmbH, Nuernberg, Germany. +# Copyright (c) 2012 SUSE LINUX Products GmbH, Nuernberg, Germany. # # All modifications and additions to the file contributed by third parties # remain the property of their copyright owners, unless otherwise agreed @@ -16,19 +16,19 @@ # - Name: perl-Want -Version: 0.18 -Release: 1 -License: GPL-1.0+ or Artistic-1.0 +Version: 0.21 +Release: 0 %define cpan_name Want Summary: A generalisation of C<wantarray> -Url: http://search.cpan.org/dist/Want/ +License: GPL-1.0+ or Artistic-1.0 Group: Development/Libraries/Perl +Url: http://search.cpan.org/dist/Want/ Source: http://www.cpan.org/authors/id/R/RO/ROBIN/%{cpan_name}-%{version}.tar.gz BuildRoot: %{_tmppath}/%{name}-%{version}-build BuildRequires: perl BuildRequires: perl-macros +#BuildRequires: perl(Want) %{perl_requires} %description @@ -51,9 +51,6 @@ %perl_process_packlist %perl_gen_filelist -%clean -%{__rm} -rf %{buildroot} - %files -f %{name}.files %defattr(-,root,root,755) %doc Changes README TODO ++++++ Want-0.18.tar.gz -> Want-0.21.tar.gz ++++++ diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/Want-0.18/Changes new/Want-0.21/Changes --- old/Want-0.18/Changes 2008-02-04 10:37:09.000000000 +0100 +++ new/Want-0.21/Changes 2012-02-29 17:54:37.000000000 +0100 @@ -94,3 +94,15 @@ 0.18 Mon Feb 4 09:35:56 GMT 2008 - Code identical to 0.17; eliminate ._files by using gnutar. + +0.19 Sat 30 Jul 2011 17:07:16 BST + - Change tests to avoid the new warning 'Useless assignment to a temporary' added in 5.15. + +0.20 Sun 5 Feb 2012 17:43:22 GMT + - Remove a test that was testing the behaviour of perl, rather than of this module, + and was testing an aspect of perl’s behaviour that has changed (bf8fb5ebd) in + in such a way that the test was failing with bleadperl. + +0.21 Wed 29 Feb 2012 16:47:58 GMT + - Avoid leaking the RHS of an lnoreturn lvalue sub, thanks to Father Chrysostomos + https://rt.cpan.org/Public/Bug/Display.html?id=72083 diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/Want-0.18/MANIFEST new/Want-0.21/MANIFEST --- old/Want-0.18/MANIFEST 2007-05-01 22:40:23.000000000 +0200 +++ new/Want-0.21/MANIFEST 2012-03-01 00:08:24.000000000 +0100 @@ -15,3 +15,4 @@ t/threads.p t/threads.t META.yml Module meta-data (added by MakeMaker) +META.json Module JSON meta-data (added by MakeMaker) diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/Want-0.18/META.json new/Want-0.21/META.json --- old/Want-0.18/META.json 1970-01-01 01:00:00.000000000 +0100 +++ new/Want-0.21/META.json 2012-03-01 00:08:24.000000000 +0100 @@ -0,0 +1,39 @@ +{ + "abstract" : "unknown", + "author" : [ + "unknown" + ], + "dynamic_config" : 1, + "generated_by" : "ExtUtils::MakeMaker version 6.58, CPAN::Meta::Converter version 2.110930001", + "license" : [ + "unknown" + ], + "meta-spec" : { + "url" : "http://search.cpan.org/perldoc?CPAN::Meta::Spec", + "version" : "2" + }, + "name" : "Want", + "no_index" : { + "directory" : [ + "t", + "inc" + ] + }, + "prereqs" : { + "build" : { + "requires" : { + "ExtUtils::MakeMaker" : 0 + } + }, + "configure" : { + "requires" : { + "ExtUtils::MakeMaker" : 0 + } + }, + "runtime" : { + "requires" : {} + } + }, + "release_status" : "stable", + "version" : "0.21" +} diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/Want-0.18/META.yml new/Want-0.21/META.yml --- old/Want-0.18/META.yml 2008-02-04 10:38:34.000000000 +0100 +++ new/Want-0.21/META.yml 2012-03-01 00:08:23.000000000 +0100 @@ -1,12 +1,21 @@ ---- #YAML:1.0 -name: Want -version: 0.18 -abstract: ~ -license: ~ -author: ~ -generated_by: ExtUtils::MakeMaker version 6.42 -distribution_type: module -requires: +--- +abstract: unknown +author: + - unknown +build_requires: + ExtUtils::MakeMaker: 0 +configure_requires: + ExtUtils::MakeMaker: 0 +dynamic_config: 1 +generated_by: 'ExtUtils::MakeMaker version 6.58, CPAN::Meta::Converter version 2.110930001' +license: unknown meta-spec: - url: http://module-build.sourceforge.net/META-spec-v1.3.html - version: 1.3 + url: http://module-build.sourceforge.net/META-spec-v1.4.html + version: 1.4 +name: Want +no_index: + directory: + - t + - inc +requires: {} +version: 0.21 diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/Want-0.18/README new/Want-0.21/README --- old/Want-0.18/README 2008-02-04 10:38:07.000000000 +0100 +++ new/Want-0.21/README 2012-02-29 19:43:15.000000000 +0100 @@ -1,5 +1,5 @@ ----------------------------------------------------------------------------- -| Want v0.18 - Robin Houston, 2008-02-04 +| Want v0.21 - Robin Houston, 2012-02-29 ----------------------------------------------------------------------------- For full documentation, see the POD included with the module. @@ -68,14 +68,16 @@ print ((pi)[3]); # prints 1 + use Want; + use strict; sub backstr :lvalue { if (want(qw'LVALUE ASSIGN')) { my ($a) = want('ASSIGN'); $_[0] = reverse $a; - return undef; + lnoreturn; } elsif (want('RVALUE')) { - my $t = scalar reverse $_[0]; + rreturn scalar reverse $_[0]; } else { carp("Not in ASSIGN context"); @@ -92,7 +94,7 @@ Robin Houston, <robin(a)cpan.org> Thanks to Damian Conway for encouragement and good - suggestions. + suggestions, and Father Chrysostomos for a patch. SEE ALSO o the wantarray entry in the perlfunc manpage @@ -101,6 +103,6 @@ http://dev.perl.org/rfc/21.html COPYRIGHT - Copyright (c) 2001-2006, Robin Houston. All Rights Reserved. + Copyright (c) 2001-2012, Robin Houston. All Rights Reserved. This module is free software. It may be used, redistributed and/or modified under the same terms as Perl itself. diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/Want-0.18/Want.pm new/Want-0.21/Want.pm --- old/Want-0.18/Want.pm 2008-02-04 10:35:55.000000000 +0100 +++ new/Want-0.21/Want.pm 2012-02-29 19:54:14.000000000 +0100 @@ -12,7 +12,7 @@ our @EXPORT = qw(want rreturn lnoreturn); our @EXPORT_OK = qw(howmany wantref); -our $VERSION = '0.18'; +our $VERSION = '0.21'; bootstrap Want $VERSION; @@ -177,7 +177,7 @@ croak "Can't lnoreturn except in ASSIGN context"; } double_return(); - return undef; + return disarm_temp(my $undef); } # Some naughty people were relying on these internal methods. @@ -497,7 +497,8 @@ Use this function instead of C<return> from inside an lvalue subroutine when you know that you're in RVALUE context. If you try to use a normal C<return>, you'll get a compile-time error in Perl 5.6.1 and above unless you return an -lvalue. +lvalue. (Note: this is no longer true in Perl 5.16, where an ordinary return +will once again work.) =item lnoreturn @@ -508,7 +509,7 @@ If you use C<rreturn> or C<lnoreturn>, then you have to put a bare C<return;> at the very end of your lvalue subroutine, in order to stop the Perl compiler from complaining. Think of it as akin to the C<1;> that you have to put at the -end of a module. +end of a module. (Note: this is no longer true in Perl 5.16.) =item howmany() @@ -690,7 +691,8 @@ Robin Houston, E<lt>robin(a)cpan.orgE<gt> -Thanks to Damian Conway for encouragement and good suggestions. +Thanks to Damian Conway for encouragement and good suggestions, +and Father Chrysostomos for a patch. =head1 SEE ALSO @@ -709,7 +711,7 @@ =head1 COPYRIGHT -Copyright (c) 2001-2006, Robin Houston. All Rights Reserved. +Copyright (c) 2001-2012, Robin Houston. All Rights Reserved. This module is free software. It may be used, redistributed and/or modified under the same terms as Perl itself. diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/Want-0.18/Want.xs new/Want-0.21/Want.xs --- old/Want-0.18/Want.xs 2008-02-03 23:29:35.000000000 +0100 +++ new/Want-0.21/Want.xs 2012-02-29 17:54:37.000000000 +0100 @@ -676,3 +676,11 @@ #endif return; + +SV * +disarm_temp(sv) +SV *sv; + CODE: + RETVAL = sv_2mortal(SvREFCNT_inc(SvREFCNT_inc(sv))); + OUTPUT: + RETVAL diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/Want-0.18/t/all.t new/Want-0.21/t/all.t --- old/Want-0.18/t/all.t 2007-05-04 12:59:46.000000000 +0200 +++ new/Want-0.21/t/all.t 2012-02-05 18:42:48.000000000 +0100 @@ -8,9 +8,10 @@ # Now test the private low-level mechanisms +my $xxx; sub lv :lvalue { print (Want::want_lvalue(0) ? "ok 2\n" : "not ok 2\n"); - my $xxx; + $xxx; } &lv = 23; @@ -141,7 +142,13 @@ @x = \(g(37, 'LVALUE', 'LIST')); ($x) = \(scalar g(38, 'RVALUE')); $$x = 29; -print ($y != 29 ? "ok 39\n" : "not ok 39\n"); + +# There used to be a test here which tested that $y != 29. However this +# is really testing the behaviour of perl itself rather than of the Want +# module, and the behaviour of perl has changed since 5.14: see +# commit bf8fb5ebd. So we don’t have to renumber all following tests, +# we just insert a dummy test 39 that always passes. +print "ok 39 # Not a real test\n"; ng(41, 'REF') = g(40, 'HASH')->{foo}; $y = sub {}; # Just to silence warning diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/Want-0.18/t/assign.t new/Want-0.21/t/assign.t --- old/Want-0.18/t/assign.t 2001-08-29 11:28:30.000000000 +0200 +++ new/Want-0.21/t/assign.t 2011-07-30 18:09:16.000000000 +0200 @@ -13,8 +13,9 @@ print (want(@_) ? "ok $t\n" : "not ok $t\n"); } +my $t; sub tl :lvalue { - my $t = shift(); + $t = shift(); print (want(@_) ? "ok $t\n" : "not ok $t\n"); $t; } -- To unsubscribe, e-mail: opensuse-commit+unsubscribe(a)opensuse.org For additional commands, e-mail: opensuse-commit+help(a)opensuse.org

1 0

commit perl-Test-Trap for openSUSE:Factory
by root＠hilbert.suse.de 31 May '12

31 May '12

Hello community, here is the log from the commit of package perl-Test-Trap for openSUSE:Factory checked in at 2012-05-31 17:08:46 ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ Comparing /work/SRC/openSUSE:Factory/perl-Test-Trap (Old) and /work/SRC/openSUSE:Factory/.perl-Test-Trap.new (New) ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ Package is "perl-Test-Trap", Maintainer is "" Changes: -------- --- /work/SRC/openSUSE:Factory/perl-Test-Trap/perl-Test-Trap.changes 2012-01-04 07:29:15.000000000 +0100 +++ /work/SRC/openSUSE:Factory/.perl-Test-Trap.new/perl-Test-Trap.changes 2012-05-31 17:08:54.000000000 +0200 @@ -1,0 +2,17 @@ +Wed May 30 11:35:28 UTC 2012 - coolo(a)suse.com + +- updated to 0.2.2 + Test::Trap::Builder::TempFile & Test::Trap::Builder::SystemSafe: + - RT#61776: Remove temporary files at first opportunity; + thanks go to Ian Goodacre. + Documentation: + - RT#61773: return from trap function + Document what trap { ... } returns. + Tests: + - RT#75430: Failing tests in 06-layer.t + Convert a number of die_is to die_like, handling cases with + and without trailing comma from carp. + - Unset another taint-checked environment variable, CDPATH; + thanks go to CPAN testers. + +------------------------------------------------------------------- Old: ---- Test-Trap-v0.2.1.tar.gz New: ---- Test-Trap-v0.2.2.tar.gz ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ Other differences: ------------------ ++++++ perl-Test-Trap.spec ++++++ --- /var/tmp/diff_new_pack.OUvTQA/_old 2012-05-31 17:08:56.000000000 +0200 +++ /var/tmp/diff_new_pack.OUvTQA/_new 2012-05-31 17:08:56.000000000 +0200 @@ -1,7 +1,7 @@ # # spec file for package perl-Test-Trap # -# Copyright (c) 2011 SUSE LINUX Products GmbH, Nuernberg, Germany. +# Copyright (c) 2012 SUSE LINUX Products GmbH, Nuernberg, Germany. # # All modifications and additions to the file contributed by third parties # remain the property of their copyright owners, unless otherwise agreed @@ -17,7 +17,7 @@ Name: perl-Test-Trap -Version: 0.2.1 +Version: 0.2.2 Release: 0 %define cpan_name Test-Trap Summary: Trap exit codes, exceptions, output, etc ++++++ Test-Trap-v0.2.1.tar.gz -> Test-Trap-v0.2.2.tar.gz ++++++ diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/Test-Trap-v0.2.1/Build.PL new/Test-Trap-v0.2.2/Build.PL --- old/Test-Trap-v0.2.1/Build.PL 2009-12-29 23:16:06.000000000 +0100 +++ new/Test-Trap-v0.2.2/Build.PL 2012-03-02 03:18:01.000000000 +0100 @@ -33,6 +33,7 @@ }, add_to_cleanup => [ 'Test-Trap-*', + 'MYMETA.yml', 't/08-fork.t', 't/11-systemsafe-basic.t', ], diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/Test-Trap-v0.2.1/Changes new/Test-Trap-v0.2.2/Changes --- old/Test-Trap-v0.2.1/Changes 2009-12-29 23:16:06.000000000 +0100 +++ new/Test-Trap-v0.2.2/Changes 2012-03-02 03:18:01.000000000 +0100 @@ -1,5 +1,19 @@ Revision history for Test-Trap +0.2.2 Fri Mar 2 02:23:04 CET 2012 + Test::Trap::Builder::TempFile & Test::Trap::Builder::SystemSafe: + - RT #61776: Remove temporary files at first opportunity; + thanks go to Ian Goodacre. + Documentation: + - RT #61773: return from trap function + Document what trap { ... } returns. + Tests: + - RT #75430: Failing tests in 06-layer.t + Convert a number of die_is to die_like, handling cases with + and without trailing comma from carp. + - Unset another taint-checked environment variable, CDPATH; + thanks go to CPAN testers. + 0.2.1 Tue Dec 29 23:14:45 CET 2009 Documentation: - fix a typo, [RT #48941]; thanks go to David Taylor; diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/Test-Trap-v0.2.1/META.yml new/Test-Trap-v0.2.2/META.yml --- old/Test-Trap-v0.2.1/META.yml 2009-12-29 23:16:06.000000000 +0100 +++ new/Test-Trap-v0.2.2/META.yml 2012-03-02 03:18:01.000000000 +0100 @@ -1,12 +1,31 @@ --- -name: Test-Trap -version: v0.2.1 +abstract: 'Trap exit codes, exceptions, output, etc.' author: - 'Eirik Berg Hanssen <Eirik-Berg.Hanssen(a)allverden.no>' -abstract: 'Trap exit codes, exceptions, output, etc.' +configure_requires: + Module::Build: 0.36 +generated_by: 'Module::Build version 0.3607' license: perl -resources: - license: http://dev.perl.org/licenses/ +meta-spec: + url: http://module-build.sourceforge.net/META-spec-v1.4.html + version: 1.4 +name: Test-Trap +provides: + Test::Trap: + file: lib/Test/Trap.pm + version: v0.2.2 + Test::Trap::Builder: + file: lib/Test/Trap/Builder.pm + version: v0.2.2 + Test::Trap::Builder::PerlIO: + file: lib/Test/Trap/Builder/PerlIO.pm + version: v0.2.2 + Test::Trap::Builder::SystemSafe: + file: lib/Test/Trap/Builder/SystemSafe.pm + version: v0.2.2 + Test::Trap::Builder::TempFile: + file: lib/Test/Trap/Builder/TempFile.pm + version: v0.2.2 requires: Carp: 0 Data::Dump: 0 @@ -23,25 +42,6 @@ strict: 0 version: 0 warnings: 0 -configure_requires: - Module::Build: 0.35 -provides: - Test::Trap: - file: lib/Test/Trap.pm - version: v0.2.1 - Test::Trap::Builder: - file: lib/Test/Trap/Builder.pm - version: v0.2.1 - Test::Trap::Builder::PerlIO: - file: lib/Test/Trap/Builder/PerlIO.pm - version: v0.2.1 - Test::Trap::Builder::SystemSafe: - file: lib/Test/Trap/Builder/SystemSafe.pm - version: v0.2.1 - Test::Trap::Builder::TempFile: - file: lib/Test/Trap/Builder/TempFile.pm - version: v0.2.1 -generated_by: Module::Build version 0.35 -meta-spec: - url: http://module-build.sourceforge.net/META-spec-v1.4.html - version: 1.4 +resources: + license: http://dev.perl.org/licenses/ +version: v0.2.2 diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/Test-Trap-v0.2.1/Makefile.PL new/Test-Trap-v0.2.2/Makefile.PL --- old/Test-Trap-v0.2.1/Makefile.PL 2009-12-29 23:16:06.000000000 +0100 +++ new/Test-Trap-v0.2.2/Makefile.PL 2012-03-02 03:18:01.000000000 +0100 @@ -1,31 +1,31 @@ -# Note: this file was auto-generated by Module::Build::Compat version 0.35 -require 5.6.2; +# Note: this file was auto-generated by Module::Build::Compat version 0.3607 +require 5.006002; use ExtUtils::MakeMaker; WriteMakefile ( - 'PL_FILES' => { - 't/08-fork.PL' => 't/08-fork.t', - 't/11-systemsafe-basic.PL' => 't/11-systemsafe-basic.t' - }, - 'INSTALLDIRS' => 'site', - 'NAME' => 'Test::Trap', - 'EXE_FILES' => [], - 'VERSION_FROM' => 'lib/Test/Trap.pm', - 'PREREQ_PM' => { - 'warnings' => 0, - 'base' => 0, - 'version' => 0, - 'IO::Handle' => 0, - 'Test::Tester' => '0.107', - 'constant' => 0, - 'Exporter' => 0, - 'Carp' => 0, - 'strict' => 0, - 'Test::More' => 0, - 'Test::Builder' => 0, - 'File::Temp' => 0, - 'Data::Dump' => 0, - 'lib' => 0 - } - ) + 'PL_FILES' => { + 't/08-fork.PL' => 't/08-fork.t', + 't/11-systemsafe-basic.PL' => 't/11-systemsafe-basic.t' + }, + 'INSTALLDIRS' => 'site', + 'NAME' => 'Test::Trap', + 'EXE_FILES' => [], + 'VERSION_FROM' => 'lib/Test/Trap.pm', + 'PREREQ_PM' => { + 'warnings' => 0, + 'base' => 0, + 'version' => 0, + 'IO::Handle' => 0, + 'Test::Tester' => '0.107', + 'constant' => 0, + 'Exporter' => 0, + 'Carp' => 0, + 'strict' => 0, + 'Test::More' => 0, + 'Test::Builder' => 0, + 'File::Temp' => 0, + 'Data::Dump' => 0, + 'lib' => 0 + } +) ; diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/Test-Trap-v0.2.1/README new/Test-Trap-v0.2.2/README --- old/Test-Trap-v0.2.1/README 2009-12-29 23:16:06.000000000 +0100 +++ new/Test-Trap-v0.2.2/README 2012-03-02 03:18:01.000000000 +0100 @@ -28,7 +28,7 @@ COPYRIGHT AND LICENCE -Copyright (C) 2006-2008 Eirik Berg Hanssen +Copyright (C) 2006-2012 Eirik Berg Hanssen This library is free software; you can redistribute it and/or modify it under the same terms as Perl itself. diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/Test-Trap-v0.2.1/lib/Test/Trap/Builder/PerlIO.pm new/Test-Trap-v0.2.2/lib/Test/Trap/Builder/PerlIO.pm --- old/Test-Trap-v0.2.1/lib/Test/Trap/Builder/PerlIO.pm 2009-12-29 23:16:06.000000000 +0100 +++ new/Test-Trap-v0.2.2/lib/Test/Trap/Builder/PerlIO.pm 2012-03-02 03:18:01.000000000 +0100 @@ -1,6 +1,6 @@ package Test::Trap::Builder::PerlIO; -use version; $VERSION = qv('0.2.1'); +use version; $VERSION = qv('0.2.2'); use strict; use warnings; @@ -30,7 +30,7 @@ =head1 VERSION -Version 0.2.1 +Version 0.2.2 =head1 DESCRIPTION @@ -58,7 +58,7 @@ =head1 COPYRIGHT & LICENSE -Copyright 2006-2007 Eirik Berg Hanssen, All Rights Reserved. +Copyright 2006-2012 Eirik Berg Hanssen, All Rights Reserved. This program is free software; you can redistribute it and/or modify it under the same terms as Perl itself. diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/Test-Trap-v0.2.1/lib/Test/Trap/Builder/SystemSafe.pm new/Test-Trap-v0.2.2/lib/Test/Trap/Builder/SystemSafe.pm --- old/Test-Trap-v0.2.1/lib/Test/Trap/Builder/SystemSafe.pm 2009-12-29 23:16:06.000000000 +0100 +++ new/Test-Trap-v0.2.2/lib/Test/Trap/Builder/SystemSafe.pm 2012-03-02 03:18:01.000000000 +0100 @@ -1,6 +1,6 @@ package Test::Trap::Builder::SystemSafe; -use version; $VERSION = qv('0.2.1'); +use version; $VERSION = qv('0.2.2'); use strict; use warnings; @@ -24,6 +24,7 @@ local $/; $self->{$name} .= $fh->getline; close $fh; # don't leak this one either! + unlink $file; } close *$globref; return unless $fh_keeper; @@ -90,7 +91,7 @@ =head1 VERSION -Version 0.2.1 +Version 0.2.2 =head1 DESCRIPTION @@ -136,7 +137,7 @@ =head1 COPYRIGHT & LICENSE -Copyright 2006-2008 Eirik Berg Hanssen, All Rights Reserved. +Copyright 2006-2012 Eirik Berg Hanssen, All Rights Reserved. This program is free software; you can redistribute it and/or modify it under the same terms as Perl itself. diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/Test-Trap-v0.2.1/lib/Test/Trap/Builder/TempFile.pm new/Test-Trap-v0.2.2/lib/Test/Trap/Builder/TempFile.pm --- old/Test-Trap-v0.2.1/lib/Test/Trap/Builder/TempFile.pm 2009-12-29 23:16:06.000000000 +0100 +++ new/Test-Trap-v0.2.2/lib/Test/Trap/Builder/TempFile.pm 2012-03-02 03:18:01.000000000 +0100 @@ -1,6 +1,6 @@ package Test::Trap::Builder::TempFile; -use version; $VERSION = qv('0.2.1'); +use version; $VERSION = qv('0.2.2'); use strict; use warnings; @@ -20,6 +20,7 @@ local $/; $self->{$name} .= <$fh>; close $fh; + unlink $file; }; binmode $fh; # superfluos? local *$globref; @@ -43,7 +44,7 @@ =head1 VERSION -Version 0.2.1 +Version 0.2.2 =head1 DESCRIPTION @@ -76,7 +77,7 @@ =head1 COPYRIGHT & LICENSE -Copyright 2006-2008 Eirik Berg Hanssen, All Rights Reserved. +Copyright 2006-2012 Eirik Berg Hanssen, All Rights Reserved. This program is free software; you can redistribute it and/or modify it under the same terms as Perl itself. diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/Test-Trap-v0.2.1/lib/Test/Trap/Builder.pm new/Test-Trap-v0.2.2/lib/Test/Trap/Builder.pm --- old/Test-Trap-v0.2.1/lib/Test/Trap/Builder.pm 2009-12-29 23:16:06.000000000 +0100 +++ new/Test-Trap-v0.2.2/lib/Test/Trap/Builder.pm 2012-03-02 03:18:01.000000000 +0100 @@ -1,6 +1,6 @@ package Test::Trap::Builder; -use version; $VERSION = qv('0.2.1'); +use version; $VERSION = qv('0.2.2'); use strict; use warnings; @@ -366,7 +366,7 @@ =head1 VERSION -Version 0.2.1 +Version 0.2.2 =head1 SYNOPSIS @@ -771,7 +771,7 @@ =head1 COPYRIGHT & LICENSE -Copyright 2006-2008 Eirik Berg Hanssen, All Rights Reserved. +Copyright 2006-2012 Eirik Berg Hanssen, All Rights Reserved. This program is free software; you can redistribute it and/or modify it under the same terms as Perl itself. diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/Test-Trap-v0.2.1/lib/Test/Trap.pm new/Test-Trap-v0.2.2/lib/Test/Trap.pm --- old/Test-Trap-v0.2.1/lib/Test/Trap.pm 2009-12-29 23:16:06.000000000 +0100 +++ new/Test-Trap-v0.2.2/lib/Test/Trap.pm 2012-03-02 03:18:01.000000000 +0100 @@ -1,6 +1,6 @@ package Test::Trap; -use version; $VERSION = qv('0.2.1'); +use version; $VERSION = qv('0.2.2'); use strict; use warnings; @@ -301,7 +301,7 @@ =head1 VERSION -Version 0.2.1 +Version 0.2.2 =head1 SYNOPSIS @@ -354,6 +354,12 @@ queried through the trap object, which is by default exported as C<$trap>, but can be exported by any name. +The value returned from C<trap> mimics that returned from C<eval>: If +the I<BLOCK> would die or exit, it returns an undefined value in +scalar context or an empty list in list context; otherwise it returns +whatever the I<BLOCK> would return in the given context (also +available as the trapped return values). + =head1 TRAP LAYERS Exactly what the C<trap> traps depends on the layers of the trap. It @@ -647,7 +653,7 @@ =head1 COPYRIGHT & LICENSE -Copyright 2006-2008 Eirik Berg Hanssen, All Rights Reserved. +Copyright 2006-2012 Eirik Berg Hanssen, All Rights Reserved. This program is free software; you can redistribute it and/or modify it under the same terms as Perl itself. diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/Test-Trap-v0.2.1/t/06-layers.t new/Test-Trap-v0.2.2/t/06-layers.t --- old/Test-Trap-v0.2.1/t/06-layers.t 2009-12-29 23:16:06.000000000 +0100 +++ new/Test-Trap-v0.2.2/t/06-layers.t 2012-03-02 03:18:01.000000000 +0100 @@ -80,23 +80,15 @@ for my $case ( [ exception1 => sub { die "going down\n" }, - "Rethrowing internal exception: going down\n at (exception1) line 7\n", + qr{^Rethrowing internal exception: going down\n at $exception1$ line 7\.?\n\z}, 0, '(in layer, so user code not run)', ], [ exception2 => sub { my $self = shift; $self->Teardown(sub { die "going up\n" } ); $self->Next }, - join( $/, - "Rethrowing teardown exception: going up\n", - "Rethrowing teardown exception: going up", - " at (exception2) line 7\n", - ), + qr{^Rethrowing teardown exception: going up\n\nRethrowing teardown exception: going up\n at $exception2$ line 7\.?\n\z}, 1, '(in teardown, so user code has been run)', ], [ exception3 => sub { my $self = shift; $self->Teardown(sub { die "going up\n" } ); die "going down\n" }, - join( $/, - "Rethrowing internal exception: going down\n", - "Rethrowing teardown exception: going up", - " at (exception3) line 7\n", - ), + qr{^Rethrowing internal exception: going down\n\nRethrowing teardown exception: going up\n at $exception3$ line 7\.?\n\z}, 0, '(in layer, so user code has not run)', ], ) { @@ -111,7 +103,7 @@ $trap->quiet(' ... quietly'); } trap { %s { ++$x } }; - $trap->die_is( $exception, ' ... internal exceptions caught and rethrown' ); + $trap->die_like( $exception, ' ... internal exceptions caught and rethrown' ); is( $x, $value, ' ... in %s, so user code %s' ); $trap->quiet; 1; diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/Test-Trap-v0.2.1/t/11-systemsafe-basic.PL new/Test-Trap-v0.2.2/t/11-systemsafe-basic.PL --- old/Test-Trap-v0.2.1/t/11-systemsafe-basic.PL 2009-12-29 23:16:06.000000000 +0100 +++ new/Test-Trap-v0.2.2/t/11-systemsafe-basic.PL 2012-03-02 03:18:01.000000000 +0100 @@ -103,6 +103,7 @@ # Protect against tainted PATH &c ... $ENV{PATH} = ''; +$ENV{CDPATH} = ''; $ENV{ENV} = ''; $ENV{BASH_ENV} = ''; -- To unsubscribe, e-mail: opensuse-commit+unsubscribe(a)opensuse.org For additional commands, e-mail: opensuse-commit+help(a)opensuse.org

1 0

commit perl-Path-Class for openSUSE:Factory
by root＠hilbert.suse.de 31 May '12

31 May '12

Hello community, here is the log from the commit of package perl-Path-Class for openSUSE:Factory checked in at 2012-05-31 17:08:41 ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ Comparing /work/SRC/openSUSE:Factory/perl-Path-Class (Old) and /work/SRC/openSUSE:Factory/.perl-Path-Class.new (New) ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ Package is "perl-Path-Class", Maintainer is "MRueckert(a)suse.com" Changes: -------- --- /work/SRC/openSUSE:Factory/perl-Path-Class/perl-Path-Class.changes 2012-03-01 17:25:17.000000000 +0100 +++ /work/SRC/openSUSE:Factory/.perl-Path-Class.new/perl-Path-Class.changes 2012-05-31 17:08:53.000000000 +0200 @@ -1,0 +2,5 @@ +Tue May 29 15:28:20 UTC 2012 - coolo(a)suse.com + +- it should work with all Module::Build + +------------------------------------------------------------------- ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ Other differences: ------------------ ++++++ perl-Path-Class.spec ++++++ --- /var/tmp/diff_new_pack.McmE6S/_old 2012-05-31 17:08:54.000000000 +0200 +++ /var/tmp/diff_new_pack.McmE6S/_new 2012-05-31 17:08:54.000000000 +0200 @@ -29,7 +29,7 @@ BuildRoot: %{_tmppath}/%{name}-%{version}-build BuildRequires: perl BuildRequires: perl-macros -BuildRequires: perl(Module::Build) >= 0.3601 +BuildRequires: perl(Module::Build) #BuildRequires: perl(Path::Class) #BuildRequires: perl(Path::Class::Dir) #BuildRequires: perl(Path::Class::Entity) -- To unsubscribe, e-mail: opensuse-commit+unsubscribe(a)opensuse.org For additional commands, e-mail: opensuse-commit+help(a)opensuse.org

1 0

commit perl-MooseX-Types for openSUSE:Factory
by root＠hilbert.suse.de 31 May '12

31 May '12

Hello community, here is the log from the commit of package perl-MooseX-Types for openSUSE:Factory checked in at 2012-05-31 17:08:36 ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ Comparing /work/SRC/openSUSE:Factory/perl-MooseX-Types (Old) and /work/SRC/openSUSE:Factory/.perl-MooseX-Types.new (New) ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ Package is "perl-MooseX-Types", Maintainer is "" Changes: -------- --- /work/SRC/openSUSE:Factory/perl-MooseX-Types/perl-MooseX-Types.changes 2012-03-05 14:02:53.000000000 +0100 +++ /work/SRC/openSUSE:Factory/.perl-MooseX-Types.new/perl-MooseX-Types.changes 2012-05-31 17:08:52.000000000 +0200 @@ -1,0 +2,14 @@ +Wed May 30 12:27:14 UTC 2012 - coolo(a)suse.com + +- updated to 0.35 + - The new delegation code could fail when a type had no + parent. Attempting to subtype Any was one way to trigger the + bug. (Dave Rolsky) + - The new delegation code broke calling ->can or ->isa on + MooseX::Types::TypeDecorator as a class method. (Dave Rolsky) + - Special case new to avoid unexpected exceptions on unloaded classes + - Switch delegation order to prioritise type over class except for new + - Support delegation of methods to the class for class types + - Factor out _try_delegate method + +------------------------------------------------------------------- Old: ---- MooseX-Types-0.31.tar.gz New: ---- MooseX-Types-0.35.tar.gz ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ Other differences: ------------------ ++++++ perl-MooseX-Types.spec ++++++ --- /var/tmp/diff_new_pack.XV6U4o/_old 2012-05-31 17:08:53.000000000 +0200 +++ /var/tmp/diff_new_pack.XV6U4o/_new 2012-05-31 17:08:53.000000000 +0200 @@ -16,86 +16,100 @@ # -%if 0%{?suse_version} < 1119 -%define with_test 1 -%endif - Name: perl-MooseX-Types -Version: 0.31 +Version: 0.35 Release: 0 +%define cpan_name MooseX-Types Summary: Organise your Moose types in libraries License: Artistic-1.0 or GPL-1.0+ Group: Development/Libraries/Perl -Source: ftp://ftp.cpan.org/pub/CPAN/authors/id/D/DR/DROLSKY/MooseX-Types-%{version}… -Url: http://search.cpan.org/dist/MooseX-Types +Url: http://search.cpan.org/dist/MooseX-Types/ +Source: http://www.cpan.org/authors/id/D/DR/DROLSKY/%{cpan_name}-%{version}.tar.gz +BuildArch: noarch BuildRoot: %{_tmppath}/%{name}-%{version}-build -%{perl_requires} -BuildRequires: make BuildRequires: perl BuildRequires: perl-macros -%if 0%{?with_test} -BuildRequires: perl(Test::More) >= 0.80 -BuildRequires: perl(Test::Requires) +BuildRequires: perl(Carp::Clan) >= 6.00 +BuildRequires: perl(Moose) >= 1.06 +BuildRequires: perl(Sub::Install) >= 0.924 +BuildRequires: perl(Sub::Name) BuildRequires: perl(Test::Fatal) BuildRequires: perl(Test::Moose) -%endif -BuildRequires: perl(FindBin) -BuildRequires: perl(ExtUtils::MakeMaker) >= 6.42 -BuildRequires: perl(Scalar::Util) >= 1.19 -BuildRequires: perl(Sub::Name) -BuildRequires: perl(Carp) +BuildRequires: perl(Test::More) >= 0.88 +BuildRequires: perl(Test::Requires) BuildRequires: perl(namespace::clean) >= 0.19 -BuildRequires: perl(Sub::Install) >= 0.924 -BuildRequires: perl(Carp::Clan) >= 6.00 -BuildRequires: perl(Moose) >= 1.06 -Requires: perl(Scalar::Util) >= 1.19 -Requires: perl(Sub::Name) -Requires: perl(Carp) -Requires: perl(namespace::clean) >= 0.19 -Requires: perl(Sub::Install) >= 0.924 +#BuildRequires: perl(Class::MOP) +#BuildRequires: perl(DecoratorLibrary) +#BuildRequires: perl(IntrospectTypeExports) +#BuildRequires: perl(Moose::Exporter) +#BuildRequires: perl(Moose::Meta::TypeConstraint::Union) +#BuildRequires: perl(Moose::Role) +#BuildRequires: perl(Moose::Util::TypeConstraints) +#BuildRequires: perl(MooseX::Types) +#BuildRequires: perl(MooseX::Types::Base) +#BuildRequires: perl(MooseX::Types::CheckedUtilExports) +#BuildRequires: perl(MooseX::Types::Combine) +#BuildRequires: perl(MooseX::Types::Moose) +#BuildRequires: perl(MooseX::Types::TypeDecorator) +#BuildRequires: perl(MooseX::Types::UndefinedType) +#BuildRequires: perl(MooseX::Types::Util) +#BuildRequires: perl(MooseX::Types::Wrapper) +#BuildRequires: perl(Sub::Exporter) +#BuildRequires: perl(SubExporterCompatibility) +#BuildRequires: perl(TestLibrary) +#BuildRequires: perl(TestNamespaceSep) +#BuildRequires: perl(Test::Spelling) +#BuildRequires: perl(TestWrapper) Requires: perl(Carp::Clan) >= 6.00 Requires: perl(Moose) >= 1.06 +Requires: perl(Sub::Install) >= 0.924 +Requires: perl(Sub::Name) +Requires: perl(namespace::clean) >= 0.19 +%{perl_requires} %description -The types provided with Moose are by design global. This package helps you -to organise and selectively import your own and the built-in types in -libraries. As a nice side effect, it catches typos at compile-time too. -However, the main reason for this module is to provide an easy way to not -have conflicts with your type names, since the internal fully qualified -names of the types will be prefixed with the library's name. -This module will also provide you with some helper functions to make it -easier to use Moose types in your code. +The type system provided by Moose effectively makes all of its builtin type +global, as are any types you declare with Moose. This means that every +module that declares a type named "PositiveInt" is sharing the same type +object. This can be a problem when different parts of the code base want to +use the same name for different things. + +This package lets you declare types using short names, but behind the +scenes it namespaces all your type declarations, effectively prevent name +clashes between packages. + +This is done by creating a type library module like 'MyApp::Types' and then +importing types from that module into other modules. + +As a side effect, the declaration mechanism allows you to write type names +as barewords (really function calls), which catches typos in names at +compile time rather than run time. + +This module also provides some helper functions for using Moose types +outside of attribute declarations. + +If you mix string-based names with types created by this module, it will +warn, with a few exceptions. If you are declaring a 'class_type()' or +'role_type()' within your type library, or if you use a fully qualified +name like '"MyApp::Foo"'. %prep -%setup -q -n "MooseX-Types-%{version}" -%__sed -i '/^auto_install/d' Makefile.PL +%setup -q -n %{cpan_name}-%{version} %build -%__perl Makefile.PL PREFIX="%{_prefix}" -%__make %{?_smp_flags} +%{__perl} Makefile.PL INSTALLDIRS=vendor +%{__make} %{?_smp_mflags} + +%check +%{__make} test %install %perl_make_install %perl_process_packlist +%perl_gen_filelist -%if 0%{?with_test} - -%check -%__make test -%endif - -%clean -%{?buildroot:%__rm -rf "%{buildroot}"} - -%files -%defattr(-,root,root) -%doc Changes README -%dir %{perl_vendorlib}/MooseX -%{perl_vendorlib}/MooseX/Types.pm -%{perl_vendorlib}/MooseX/Types -%dir %{perl_vendorarch}/auto/MooseX -%{perl_vendorarch}/auto/MooseX/Types -%doc %{perl_man3dir}/MooseX::Types.%{perl_man3ext}%{ext_man} -%doc %{perl_man3dir}/MooseX::Types::*.%{perl_man3ext}%{ext_man} +%files -f %{name}.files +%defattr(-,root,root,755) +%doc Changes LICENSE README %changelog ++++++ MooseX-Types-0.31.tar.gz -> MooseX-Types-0.35.tar.gz ++++++ diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/MooseX-Types-0.31/Changes new/MooseX-Types-0.35/Changes --- old/MooseX-Types-0.31/Changes 2011-12-23 00:43:56.000000000 +0100 +++ new/MooseX-Types-0.35/Changes 2012-05-19 07:43:55.000000000 +0200 @@ -1,5 +1,27 @@ Revision history for MooseX-Types +0.35 2012-05-19 + + - The new delegation code could fail when a type had no + parent. Attempting to subtype Any was one way to trigger the + bug. (Dave Rolsky) + + - The new delegation code broke calling ->can or ->isa on + MooseX::Types::TypeDecorator as a class method. (Dave Rolsky) + +0.34 2012-05-18 + + - Special case new to avoid unexpected exceptions on unloaded classes + +0.33 2012-05-18 + + - Switch delegation order to prioritise type over class except for new + +0.32 2012-05-18 + + - Support delegation of methods to the class for class types + - Factor out _try_delegate method + 0.31 2011-12-22 - Add support for qw( :all ) on MooseX::Types::Combine libraries. (kentnl) diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/MooseX-Types-0.31/LICENSE new/MooseX-Types-0.35/LICENSE --- old/MooseX-Types-0.31/LICENSE 2011-12-23 00:43:56.000000000 +0100 +++ new/MooseX-Types-0.35/LICENSE 2012-05-19 07:43:55.000000000 +0200 @@ -1,4 +1,4 @@ -This software is copyright (c) 2011 by Robert "phaylon" Sedlacek. +This software is copyright (c) 2012 by Robert "phaylon" Sedlacek. This is free software; you can redistribute it and/or modify it under the same terms as the Perl 5 programming language system itself. @@ -12,7 +12,7 @@ --- The GNU General Public License, Version 1, February 1989 --- -This software is Copyright (c) 2011 by Robert "phaylon" Sedlacek. +This software is Copyright (c) 2012 by Robert "phaylon" Sedlacek. This is free software, licensed under: @@ -272,7 +272,7 @@ --- The Artistic License 1.0 --- -This software is Copyright (c) 2011 by Robert "phaylon" Sedlacek. +This software is Copyright (c) 2012 by Robert "phaylon" Sedlacek. This is free software, licensed under: diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/MooseX-Types-0.31/MANIFEST new/MooseX-Types-0.35/MANIFEST --- old/MooseX-Types-0.31/MANIFEST 2011-12-23 00:43:56.000000000 +0100 +++ new/MooseX-Types-0.35/MANIFEST 2012-05-19 07:43:55.000000000 +0200 @@ -28,6 +28,9 @@ t/19_typelib_with_role.t t/20_union_with_string_type.t t/21_coerce_parameterized_types.t +t/22_class_type.t +t/23_any_subtype.t +t/24_class_can_isa.t t/lib/Combined.pm t/lib/DecoratorLibrary.pm t/lib/Empty.pm diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/MooseX-Types-0.31/META.json new/MooseX-Types-0.35/META.json --- old/MooseX-Types-0.31/META.json 2011-12-23 00:43:56.000000000 +0100 +++ new/MooseX-Types-0.35/META.json 2012-05-19 07:43:55.000000000 +0200 @@ -4,7 +4,7 @@ "Robert \"phaylon\" Sedlacek <rs(a)474.at>" ], "dynamic_config" : 0, - "generated_by" : "Dist::Zilla version 4.300005, CPAN::Meta::Converter version 2.112150", + "generated_by" : "Dist::Zilla version 4.300015, CPAN::Meta::Converter version 2.120900", "license" : [ "perl_5" ], @@ -16,11 +16,11 @@ "prereqs" : { "build" : { "requires" : { - "FindBin" : 0, - "Test::Fatal" : 0, - "Test::Moose" : 0, + "FindBin" : "0", + "Test::Fatal" : "0", + "Test::Moose" : "0", "Test::More" : "0.88", - "Test::Requires" : 0 + "Test::Requires" : "0" } }, "configure" : { @@ -30,12 +30,12 @@ }, "runtime" : { "requires" : { - "Carp" : 0, + "Carp" : "0", "Carp::Clan" : "6.00", "Moose" : "1.06", "Scalar::Util" : "1.19", "Sub::Install" : "0.924", - "Sub::Name" : 0, + "Sub::Name" : "0", "namespace::clean" : "0.19", "perl" : "v5.8.0" } @@ -53,6 +53,6 @@ "web" : "http://git.shadowcat.co.uk/gitweb/gitweb.cgi?p=gitmo/MooseX-Types.git;a=sum…" } }, - "version" : "0.31" + "version" : "0.35" } diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/MooseX-Types-0.31/META.yml new/MooseX-Types-0.35/META.yml --- old/MooseX-Types-0.31/META.yml 2011-12-23 00:43:56.000000000 +0100 +++ new/MooseX-Types-0.35/META.yml 2012-05-19 07:43:55.000000000 +0200 @@ -11,7 +11,7 @@ configure_requires: ExtUtils::MakeMaker: 6.30 dynamic_config: 0 -generated_by: 'Dist::Zilla version 4.300005, CPAN::Meta::Converter version 2.112150' +generated_by: 'Dist::Zilla version 4.300015, CPAN::Meta::Converter version 2.120900' license: perl meta-spec: url: http://module-build.sourceforge.net/META-spec-v1.4.html @@ -29,4 +29,4 @@ resources: bugtracker: http://rt.cpan.org/NoAuth/Bugs.html?Dist=MooseX-Types repository: git://git.moose.perl.org/MooseX-Types.git -version: 0.31 +version: 0.35 diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/MooseX-Types-0.31/Makefile.PL new/MooseX-Types-0.35/Makefile.PL --- old/MooseX-Types-0.31/Makefile.PL 2011-12-23 00:43:56.000000000 +0100 +++ new/MooseX-Types-0.35/Makefile.PL 2012-05-19 07:43:55.000000000 +0200 @@ -34,7 +34,7 @@ "Sub::Name" => 0, "namespace::clean" => "0.19" }, - "VERSION" => "0.31", + "VERSION" => "0.35", "test" => { "TESTS" => "t/*.t t/regressions/*.t" } diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/MooseX-Types-0.31/README new/MooseX-Types-0.35/README --- old/MooseX-Types-0.31/README 2011-12-23 00:43:56.000000000 +0100 +++ new/MooseX-Types-0.35/README 2012-05-19 07:43:55.000000000 +0200 @@ -1,11 +1,11 @@ This archive contains the distribution MooseX-Types, -version 0.31: +version 0.35: Organise your Moose types in libraries -This software is copyright (c) 2011 by Robert "phaylon" Sedlacek. +This software is copyright (c) 2012 by Robert "phaylon" Sedlacek. This is free software; you can redistribute it and/or modify it under the same terms as the Perl 5 programming language system itself. diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/MooseX-Types-0.31/dist.ini new/MooseX-Types-0.35/dist.ini --- old/MooseX-Types-0.31/dist.ini 2011-12-23 00:43:56.000000000 +0100 +++ new/MooseX-Types-0.35/dist.ini 2012-05-19 07:43:55.000000000 +0200 @@ -3,7 +3,7 @@ license = Perl_5 copyright_holder = Robert "phaylon" Sedlacek -version = 0.31 +version = 0.35 [NextRelease] format = %-7v %{yyyy-MM-dd}d diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/MooseX-Types-0.31/lib/MooseX/Types/Base.pm new/MooseX-Types-0.35/lib/MooseX/Types/Base.pm --- old/MooseX-Types-0.31/lib/MooseX/Types/Base.pm 2011-12-23 00:43:56.000000000 +0100 +++ new/MooseX-Types-0.35/lib/MooseX/Types/Base.pm 2012-05-19 07:43:55.000000000 +0200 @@ -1,6 +1,6 @@ package MooseX::Types::Base; { - $MooseX::Types::Base::VERSION = '0.31'; + $MooseX::Types::Base::VERSION = '0.35'; } use Moose; @@ -209,7 +209,7 @@ =head1 VERSION -version 0.31 +version 0.35 =head1 DESCRIPTION @@ -286,7 +286,7 @@ =head1 COPYRIGHT AND LICENSE -This software is copyright (c) 2011 by Robert "phaylon" Sedlacek. +This software is copyright (c) 2012 by Robert "phaylon" Sedlacek. This is free software; you can redistribute it and/or modify it under the same terms as the Perl 5 programming language system itself. diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/MooseX-Types-0.31/lib/MooseX/Types/CheckedUtilExports.pm new/MooseX-Types-0.35/lib/MooseX/Types/CheckedUtilExports.pm --- old/MooseX-Types-0.31/lib/MooseX/Types/CheckedUtilExports.pm 2011-12-23 00:43:56.000000000 +0100 +++ new/MooseX-Types-0.35/lib/MooseX/Types/CheckedUtilExports.pm 2012-05-19 07:43:55.000000000 +0200 @@ -1,6 +1,6 @@ package MooseX::Types::CheckedUtilExports; { - $MooseX::Types::CheckedUtilExports::VERSION = '0.31'; + $MooseX::Types::CheckedUtilExports::VERSION = '0.35'; } #ABSTRACT: Wrap L<Moose::Util::TypeConstraints> to be safer for L<MooseX::Types> @@ -70,7 +70,7 @@ =head1 VERSION -version 0.31 +version 0.35 =head1 DESCRIPTION @@ -109,7 +109,7 @@ =head1 COPYRIGHT AND LICENSE -This software is copyright (c) 2011 by Robert "phaylon" Sedlacek. +This software is copyright (c) 2012 by Robert "phaylon" Sedlacek. This is free software; you can redistribute it and/or modify it under the same terms as the Perl 5 programming language system itself. diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/MooseX-Types-0.31/lib/MooseX/Types/Combine.pm new/MooseX-Types-0.35/lib/MooseX/Types/Combine.pm --- old/MooseX-Types-0.31/lib/MooseX/Types/Combine.pm 2011-12-23 00:43:56.000000000 +0100 +++ new/MooseX-Types-0.35/lib/MooseX/Types/Combine.pm 2012-05-19 07:43:55.000000000 +0200 @@ -1,6 +1,6 @@ package MooseX::Types::Combine; { - $MooseX::Types::Combine::VERSION = '0.31'; + $MooseX::Types::Combine::VERSION = '0.35'; } # ABSTRACT: Combine type libraries for exporting @@ -94,7 +94,7 @@ =head1 VERSION -version 0.31 +version 0.35 =head1 SYNOPSIS @@ -136,7 +136,7 @@ =head1 COPYRIGHT AND LICENSE -This software is copyright (c) 2011 by Robert "phaylon" Sedlacek. +This software is copyright (c) 2012 by Robert "phaylon" Sedlacek. This is free software; you can redistribute it and/or modify it under the same terms as the Perl 5 programming language system itself. diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/MooseX-Types-0.31/lib/MooseX/Types/Moose.pm new/MooseX-Types-0.35/lib/MooseX/Types/Moose.pm --- old/MooseX-Types-0.31/lib/MooseX/Types/Moose.pm 2011-12-23 00:43:56.000000000 +0100 +++ new/MooseX-Types-0.35/lib/MooseX/Types/Moose.pm 2012-05-19 07:43:55.000000000 +0200 @@ -1,6 +1,6 @@ package MooseX::Types::Moose; { - $MooseX::Types::Moose::VERSION = '0.31'; + $MooseX::Types::Moose::VERSION = '0.35'; } # ABSTRACT: Type exports that match the types shipped with L<Moose> @@ -35,7 +35,7 @@ =head1 VERSION -version 0.31 +version 0.35 =head1 SYNOPSIS @@ -91,7 +91,7 @@ =head1 COPYRIGHT AND LICENSE -This software is copyright (c) 2011 by Robert "phaylon" Sedlacek. +This software is copyright (c) 2012 by Robert "phaylon" Sedlacek. This is free software; you can redistribute it and/or modify it under the same terms as the Perl 5 programming language system itself. diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/MooseX-Types-0.31/lib/MooseX/Types/TypeDecorator.pm new/MooseX-Types-0.35/lib/MooseX/Types/TypeDecorator.pm --- old/MooseX-Types-0.31/lib/MooseX/Types/TypeDecorator.pm 2011-12-23 00:43:56.000000000 +0100 +++ new/MooseX-Types-0.35/lib/MooseX/Types/TypeDecorator.pm 2012-05-19 07:43:55.000000000 +0200 @@ -1,6 +1,6 @@ package MooseX::Types::TypeDecorator; { - $MooseX::Types::TypeDecorator::VERSION = '0.31'; + $MooseX::Types::TypeDecorator::VERSION = '0.35'; } #ABSTRACT: Wraps Moose::Meta::TypeConstraint objects with added features @@ -57,7 +57,11 @@ sub new { - my $class = shift @_; + my $proto = shift; + if (ref($proto)) { + return $proto->_try_delegate('new', @_); + } + my $class = $proto; if(my $arg = shift @_) { if(blessed $arg && $arg->isa('Moose::Meta::TypeConstraint')) { return bless {'__type_constraint'=>$arg}, $class; @@ -92,39 +96,21 @@ sub isa { - my ($self, $target) = @_; - if(defined $target) { - if(blessed $self) { - return $self->__type_constraint->isa($target); - } else { - return; - } - } else { - return; - } + my $self = shift; + return + blessed $self + ? $self->__type_constraint->isa(@_) + || $self->_try_delegate( 'isa', @_ ) + : $self->SUPER::isa(@_); } - sub can { - my ($self, $target) = @_; - if(defined $target) { - if(blessed $self) { - return $self->__type_constraint->can($target); - } else { - return; - } - } else { - return; - } -} - + my $self = shift; -sub meta { - my $self = shift @_; - if(blessed $self) { - return $self->__type_constraint->meta; - } + return blessed $self + ? $self->_try_delegate( 'can', @_ ) + : $self->SUPER::can(@_); } @@ -142,22 +128,49 @@ sub AUTOLOAD { - my ($self, @args) = @_; my ($method) = (our $AUTOLOAD =~ /([^:]+)$/); ## We delegate with this method in an attempt to support a value of ## __type_constraint which is also AUTOLOADing, in particular the class ## MooseX::Types::UndefinedType which AUTOLOADs during autovivication. - - my $return; - eval { - $return = $self->__type_constraint->$method(@args); - }; if($@) { - __PACKAGE__->_throw_error($@); - } else { - return $return; + + $self->_try_delegate($method, @args); +} + +sub _try_delegate { + my ($self, $method, @args) = @_; + my $tc = $self->__type_constraint; + my $class; + if ($tc->can('is_subtype_of')) { # Union can't + my $search_tc = $tc; + while (1) { + if ($search_tc->isa('Moose::Meta::TypeConstraint::Class')) { + $class = $search_tc->class; + last; + } + $search_tc = $search_tc->parent; + last unless $search_tc && $search_tc->is_subtype_of('Object'); + } } + + my $inv = do { + if ($method eq 'new') { + die "new called on type decorator for non-class-type ".$tc->name + unless $class; + die "new called on class type decorator ".$tc->name."\n" + ." for class ${class}\n" + ." which does not provide a new method - did you forget to load it?" + unless $class->can('new'); + $class + } elsif ($class && !$tc->can($method)) { + $class + } else { + $tc + } + }; + + $inv->$method(@args); } @@ -172,7 +185,7 @@ =head1 VERSION -version 0.31 +version 0.35 =head1 DESCRIPTION @@ -193,16 +206,13 @@ =head2 isa -handle $self->isa since AUTOLOAD can't. +handle $self->isa since AUTOLOAD can't - this tries both the type constraint, +and for a class type, the class. =head2 can handle $self->can since AUTOLOAD can't. -=head2 meta - -have meta examine the underlying type constraints - =head2 _throw_error properly delegate error messages @@ -213,7 +223,11 @@ =head2 AUTOLOAD -Delegate to the decorator target. +Delegate to the decorator target, unless this is a class type, in which +case it will try to delegate to the type object, then if that fails try +the class. The method 'new' is special cased to only be permitted on +the class; if there is no class, or it does not provide a new method, +an exception will be thrown. =head1 LICENSE @@ -226,7 +240,7 @@ =head1 COPYRIGHT AND LICENSE -This software is copyright (c) 2011 by Robert "phaylon" Sedlacek. +This software is copyright (c) 2012 by Robert "phaylon" Sedlacek. This is free software; you can redistribute it and/or modify it under the same terms as the Perl 5 programming language system itself. diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/MooseX-Types-0.31/lib/MooseX/Types/UndefinedType.pm new/MooseX-Types-0.35/lib/MooseX/Types/UndefinedType.pm --- old/MooseX-Types-0.31/lib/MooseX/Types/UndefinedType.pm 2011-12-23 00:43:56.000000000 +0100 +++ new/MooseX-Types-0.35/lib/MooseX/Types/UndefinedType.pm 2012-05-19 07:43:55.000000000 +0200 @@ -1,6 +1,6 @@ package MooseX::Types::UndefinedType; { - $MooseX::Types::UndefinedType::VERSION = '0.31'; + $MooseX::Types::UndefinedType::VERSION = '0.35'; } use warnings; diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/MooseX-Types-0.31/lib/MooseX/Types/Util.pm new/MooseX-Types-0.35/lib/MooseX/Types/Util.pm --- old/MooseX-Types-0.31/lib/MooseX/Types/Util.pm 2011-12-23 00:43:56.000000000 +0100 +++ new/MooseX-Types-0.35/lib/MooseX/Types/Util.pm 2012-05-19 07:43:55.000000000 +0200 @@ -1,6 +1,6 @@ package MooseX::Types::Util; { - $MooseX::Types::Util::VERSION = '0.31'; + $MooseX::Types::Util::VERSION = '0.35'; } #ABSTRACT: Common utility functions for the distribution @@ -53,7 +53,7 @@ =head1 VERSION -version 0.31 +version 0.35 =head1 DESCRIPTION @@ -119,7 +119,7 @@ =head1 COPYRIGHT AND LICENSE -This software is copyright (c) 2011 by Robert "phaylon" Sedlacek. +This software is copyright (c) 2012 by Robert "phaylon" Sedlacek. This is free software; you can redistribute it and/or modify it under the same terms as the Perl 5 programming language system itself. diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/MooseX-Types-0.31/lib/MooseX/Types/Wrapper.pm new/MooseX-Types-0.35/lib/MooseX/Types/Wrapper.pm --- old/MooseX-Types-0.31/lib/MooseX/Types/Wrapper.pm 2011-12-23 00:43:56.000000000 +0100 +++ new/MooseX-Types-0.35/lib/MooseX/Types/Wrapper.pm 2012-05-19 07:43:55.000000000 +0200 @@ -1,6 +1,6 @@ package MooseX::Types::Wrapper; { - $MooseX::Types::Wrapper::VERSION = '0.31'; + $MooseX::Types::Wrapper::VERSION = '0.35'; } #ABSTRACT: Wrap exports from a library @@ -48,7 +48,7 @@ =head1 VERSION -version 0.31 +version 0.35 =head1 DESCRIPTION @@ -73,7 +73,7 @@ =head1 COPYRIGHT AND LICENSE -This software is copyright (c) 2011 by Robert "phaylon" Sedlacek. +This software is copyright (c) 2012 by Robert "phaylon" Sedlacek. This is free software; you can redistribute it and/or modify it under the same terms as the Perl 5 programming language system itself. diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/MooseX-Types-0.31/lib/MooseX/Types.pm new/MooseX-Types-0.35/lib/MooseX/Types.pm --- old/MooseX-Types-0.31/lib/MooseX/Types.pm 2011-12-23 00:43:56.000000000 +0100 +++ new/MooseX-Types-0.35/lib/MooseX/Types.pm 2012-05-19 07:43:55.000000000 +0200 @@ -1,6 +1,6 @@ package MooseX::Types; { - $MooseX::Types::VERSION = '0.31'; + $MooseX::Types::VERSION = '0.35'; } use Moose; @@ -24,7 +24,7 @@ sub import { my ($class, %args) = @_; - my $callee = caller; + my $caller = caller; # everyone should want this strict->import; @@ -32,7 +32,7 @@ # inject base class into new library { no strict 'refs'; - unshift @{ $callee . '::ISA' }, 'MooseX::Types::Base'; + unshift @{ $caller . '::ISA' }, 'MooseX::Types::Base'; } # generate predeclared type helpers @@ -46,18 +46,18 @@ if $type =~ /::/; # add type to library and remember to export - $callee->add_type($type); + $caller->add_type($type); push @to_export, $type; } - $callee->import({ -full => 1, -into => $callee }, @to_export); + $caller->import({ -full => 1, -into => $caller }, @to_export); } # run type constraints import - Moose::Util::TypeConstraints->import({ into => $callee }); + Moose::Util::TypeConstraints->import({ into => $caller }); # override some with versions that check for syntax errors - MooseX::Types::CheckedUtilExports->import({ into => $callee }); + MooseX::Types::CheckedUtilExports->import({ into => $caller }); 1; } @@ -176,7 +176,7 @@ =head1 VERSION -version 0.31 +version 0.35 =head1 SYNOPSIS @@ -299,7 +299,7 @@ If you mix string-based names with types created by this module, it will warn, with a few exceptions. If you are declaring a C<class_type()> or -c<role_type()> within your type library, or if you use a fully qualified name +C<role_type()> within your type library, or if you use a fully qualified name like C<"MyApp::Foo">. =head1 LIBRARY DEFINITION @@ -620,7 +620,7 @@ =head1 COPYRIGHT AND LICENSE -This software is copyright (c) 2011 by Robert "phaylon" Sedlacek. +This software is copyright (c) 2012 by Robert "phaylon" Sedlacek. This is free software; you can redistribute it and/or modify it under the same terms as the Perl 5 programming language system itself. diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/MooseX-Types-0.31/t/22_class_type.t new/MooseX-Types-0.35/t/22_class_type.t --- old/MooseX-Types-0.31/t/22_class_type.t 1970-01-01 01:00:00.000000000 +0100 +++ new/MooseX-Types-0.35/t/22_class_type.t 2012-05-19 07:43:55.000000000 +0200 @@ -0,0 +1,56 @@ +use strict; +use warnings; +use Test::More; + +BEGIN { + package MyTypes; + + use MooseX::Types::Moose qw( Item ); + use MooseX::Types -declare => [ 'ClassyType', 'NoClass' ]; + + class_type 'ClassyClass'; + + subtype ClassyType, as 'ClassyClass'; + + subtype NoClass, as Item, where { 1 }; +} + +BEGIN { + + ok(!eval { MyTypes::ClassyType->new }, 'new without class loaded explodes'); + + like($@, qr/does not provide/, 'right exception'); + + ok(!eval { MyTypes::NoClass->new }, 'new on non-class type'); + + like($@, qr/non-class-type/, 'right exception'); +} + +BEGIN { + + package ClassyClass; + + use Moose; + + sub check { die "FAIL" } + + package ClassyClassConsumer; + + BEGIN { MyTypes->import('ClassyType') } + use Moose; + + has om_nom => ( + is => 'ro', isa => ClassyType, default => sub { ClassyType->new } + ); + +} + +ok(my $o = ClassyClassConsumer->new, "Constructor happy"); + +is(ref($o->om_nom), 'ClassyClass', 'Attribute happy'); + +ok(ClassyClassConsumer->new(om_nom => ClassyClass->new), 'Constructor happy'); + +ok(!eval { ClassyClassConsumer->new(om_nom => 3) }, 'Type checked'); + +done_testing; diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/MooseX-Types-0.31/t/23_any_subtype.t new/MooseX-Types-0.35/t/23_any_subtype.t --- old/MooseX-Types-0.31/t/23_any_subtype.t 1970-01-01 01:00:00.000000000 +0100 +++ new/MooseX-Types-0.35/t/23_any_subtype.t 2012-05-19 07:43:55.000000000 +0200 @@ -0,0 +1,16 @@ +use strict; +use warnings; + +use Test::More; +use Test::Fatal; + +use MooseX::Types -declare => ['Foo']; +use MooseX::Types::Moose qw( Any ); + +is( + exception { subtype Foo, as Any }, + undef, + 'no exception when subtyping Any type' +); + +done_testing(); diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/MooseX-Types-0.31/t/24_class_can_isa.t new/MooseX-Types-0.35/t/24_class_can_isa.t --- old/MooseX-Types-0.31/t/24_class_can_isa.t 1970-01-01 01:00:00.000000000 +0100 +++ new/MooseX-Types-0.35/t/24_class_can_isa.t 2012-05-19 07:43:55.000000000 +0200 @@ -0,0 +1,21 @@ +use strict; +use warnings; + +use Test::More; +use Test::Fatal; + +use MooseX::Types::TypeDecorator; + +is( + exception { MooseX::Types::TypeDecorator->isa('X') }, + undef, + 'no exception calling ->isa on MooseX::Types::TypeDecorator as class method' +); + +is( + exception { MooseX::Types::TypeDecorator->can('X') }, + undef, + 'no exception calling ->can on MooseX::Types::TypeDecorator as class method' +); + +done_testing(); -- To unsubscribe, e-mail: opensuse-commit+unsubscribe(a)opensuse.org For additional commands, e-mail: opensuse-commit+help(a)opensuse.org

1 0

commit perl-Moose for openSUSE:Factory
by root＠hilbert.suse.de 31 May '12

31 May '12

Hello community, here is the log from the commit of package perl-Moose for openSUSE:Factory checked in at 2012-05-31 17:08:31 ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ Comparing /work/SRC/openSUSE:Factory/perl-Moose (Old) and /work/SRC/openSUSE:Factory/.perl-Moose.new (New) ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ Package is "perl-Moose", Maintainer is "" Changes: -------- --- /work/SRC/openSUSE:Factory/perl-Moose/perl-Moose.changes 2012-03-13 09:38:15.000000000 +0100 +++ /work/SRC/openSUSE:Factory/.perl-Moose.new/perl-Moose.changes 2012-05-31 17:08:51.000000000 +0200 @@ -1,0 +2,20 @@ +Wed May 30 05:40:33 UTC 2012 - coolo(a)suse.com + +- updated to 2.0602 + [BUG FIXES] + + * Ensure that the Moose::Exporter-generated init_meta returns the same value + that it did previously. This isn't really a bug, since the return value has + never been tested or documented, but since the generated init_meta is + nothing more than a compatibility shim at this point, there's no reason to + not make it as compatible as possible. Reported by Moritz Onken. (doy) + + [BUG FIXES] + + * Fix init_meta order when multiple also packages are specified (this matters + when one of them is being used to actually initalize the metaclass, + typically with also => 'Moose'). Reported by Randy Stauner. (doy) + + ... see Changes + +------------------------------------------------------------------- Old: ---- Moose-2.0401.tar.gz New: ---- Moose-2.0602.tar.gz ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ Other differences: ------------------ ++++++ perl-Moose.spec ++++++ --- /var/tmp/diff_new_pack.c02k8v/_old 2012-05-31 17:08:52.000000000 +0200 +++ /var/tmp/diff_new_pack.c02k8v/_new 2012-05-31 17:08:52.000000000 +0200 @@ -17,52 +17,43 @@ Name: perl-Moose -Version: 2.0401 +Version: 2.0602 Release: 0 %define cpan_name Moose Summary: A postmodern object system for Perl 5 -License: GPL-1.0+ or Artistic-1.0 +License: Artistic-1.0 or GPL-1.0+ Group: Development/Libraries/Perl Url: http://search.cpan.org/dist/Moose/ Source: http://www.cpan.org/authors/id/D/DO/DOY/%{cpan_name}-%{version}.tar.gz -Patch2: perl-Moose-apply_role.patch -BuildRoot: %{_tmppath}/%{name}-%{version}-build -# MANUAL +# MANUAL BEGIN Provides: perl-Class-MOP = %{version} Obsoletes: perl-Class-MOP < %{version} +Patch2: perl-Moose-apply_role.patch +# MANUAL END +BuildRoot: %{_tmppath}/%{name}-%{version}-build BuildRequires: perl BuildRequires: perl-macros -BuildRequires: perl(DBM::Deep) -BuildRequires: perl(Data::OptList) -BuildRequires: perl(DateTime::Format::MySQL) -BuildRequires: perl(Declare::Constraints::Simple) +BuildRequires: perl(Class::Load) >= 0.09 +BuildRequires: perl(Class::Load::XS) >= 0.01 +BuildRequires: perl(Data::OptList) >= 0.107 BuildRequires: perl(Devel::GlobalDestruction) BuildRequires: perl(Dist::CheckConflicts) >= 0.02 -BuildRequires: perl(Eval::Closure) -BuildRequires: perl(ExtUtils::MakeMaker) -BuildRequires: perl(IO::String) -BuildRequires: perl(List::MoreUtils) >= 0.12 +BuildRequires: perl(Eval::Closure) >= 0.04 +BuildRequires: perl(List::MoreUtils) >= 0.28 BuildRequires: perl(MRO::Compat) >= 0.05 -BuildRequires: perl(Module::Refresh) BuildRequires: perl(Package::DeprecationManager) >= 0.11 -BuildRequires: perl(Package::Stash) >= 0.21 -BuildRequires: perl(Package::Stash::XS) >= 0.18 +BuildRequires: perl(Package::Stash) >= 0.32 +BuildRequires: perl(Package::Stash::XS) >= 0.24 BuildRequires: perl(Params::Util) >= 1.00 -BuildRequires: perl(SUPER) -BuildRequires: perl(Scalar::Util) >= 1.19 BuildRequires: perl(Sub::Exporter) >= 0.980 BuildRequires: perl(Sub::Name) >= 0.05 BuildRequires: perl(Task::Weaken) -BuildRequires: perl(Test::Deep) BuildRequires: perl(Test::Fatal) >= 0.001 -BuildRequires: perl(Test::LeakTrace) BuildRequires: perl(Test::More) >= 0.88 -BuildRequires: perl(Test::Output) BuildRequires: perl(Test::Requires) >= 0.05 BuildRequires: perl(Try::Tiny) >= 0.02 Requires: perl(Class::Load) >= 0.09 Requires: perl(Class::Load::XS) >= 0.01 -Requires: perl(Data::OptList) Requires: perl(Data::OptList) >= 0.107 Requires: perl(Devel::GlobalDestruction) Requires: perl(Dist::CheckConflicts) >= 0.02 @@ -73,12 +64,11 @@ Requires: perl(Package::Stash) >= 0.32 Requires: perl(Package::Stash::XS) >= 0.24 Requires: perl(Params::Util) >= 1.00 -Requires: perl(Scalar::Util) >= 1.19 Requires: perl(Sub::Exporter) >= 0.980 Requires: perl(Sub::Name) >= 0.05 Requires: perl(Task::Weaken) Requires: perl(Try::Tiny) >= 0.02 - +Recommends: perl(Devel::PartialDump) >= 0.14 %{perl_requires} %description @@ -95,6 +85,8 @@ %prep %setup -q -n %{cpan_name}-%{version} +find . -type f -print0 | xargs -0 chmod 644 +# MANUAL BEGIN %if 0%{?suse_version} <= 1110 for i in `find t -type f` ; do sed -i -e "s@^\s*use\s\s*Test::More@use lib '%{perl_vendorlib}';\nuse Test::More@" $i @@ -106,7 +98,7 @@ %else %patch2 -p0 %endif -find . -type f -print0 | xargs -0 chmod 644 +# MANUAL END %build %{__perl} Makefile.PL INSTALLDIRS=vendor OPTIMIZE="%{optflags}" @@ -120,9 +112,6 @@ %perl_process_packlist %perl_gen_filelist -%clean -%{?buildroot:%__rm -rf "%{buildroot}"} - %files -f %{name}.files %defattr(-,root,root,755) %doc author benchmarks Changes Changes.Class-MOP doap.rdf doc eg examples LICENSE README TODO ++++++ Moose-2.0401.tar.gz -> Moose-2.0602.tar.gz ++++++ ++++ 24418 lines of diff (skipped) -- To unsubscribe, e-mail: opensuse-commit+unsubscribe(a)opensuse.org For additional commands, e-mail: opensuse-commit+help(a)opensuse.org

1 0

commit perl-Log-Log4perl for openSUSE:Factory
by root＠hilbert.suse.de 31 May '12

31 May '12

Hello community, here is the log from the commit of package perl-Log-Log4perl for openSUSE:Factory checked in at 2012-05-31 17:08:26 ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ Comparing /work/SRC/openSUSE:Factory/perl-Log-Log4perl (Old) and /work/SRC/openSUSE:Factory/.perl-Log-Log4perl.new (New) ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ Package is "perl-Log-Log4perl", Maintainer is "ug(a)suse.com" Changes: -------- --- /work/SRC/openSUSE:Factory/perl-Log-Log4perl/perl-Log-Log4perl.changes 2011-12-21 10:02:26.000000000 +0100 +++ /work/SRC/openSUSE:Factory/.perl-Log-Log4perl.new/perl-Log-Log4perl.changes 2012-05-31 17:08:49.000000000 +0200 @@ -1,0 +2,15 @@ +Wed May 30 11:18:04 UTC 2012 - coolo(a)suse.com + +- updated to 1.36 + * (ms) [rt.cpan.org #74833] Reini Urban fixed "defined @array" for + perl 5.16 + * (ms) [rt.cpan.org #74836] Cope with Carp's questionable decision to + add a trailing dot to its messages. + + * (ms) [rt.cpan.org #73462] Changed logwarn/logcluck/logcarp/error_warn + to warn() unconditionally and send the message to log4perl which + will log it only if the log level conditions are met. + * (ms) [rt.cpan.org #73598] Gerda Shank reported test suite problems + with DBD::CSV-0.26. Bumped up to DBD::CSV-0.33 if installed. + +------------------------------------------------------------------- Old: ---- Log-Log4perl-1.34.tar.gz New: ---- Log-Log4perl-1.36.tar.gz ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ Other differences: ------------------ ++++++ perl-Log-Log4perl.spec ++++++ --- /var/tmp/diff_new_pack.felyyF/_old 2012-05-31 17:08:50.000000000 +0200 +++ /var/tmp/diff_new_pack.felyyF/_new 2012-05-31 17:08:50.000000000 +0200 @@ -1,7 +1,7 @@ # # spec file for package perl-Log-Log4perl # -# Copyright (c) 2011 SUSE LINUX Products GmbH, Nuernberg, Germany. +# Copyright (c) 2012 SUSE LINUX Products GmbH, Nuernberg, Germany. # # All modifications and additions to the file contributed by third parties # remain the property of their copyright owners, unless otherwise agreed @@ -16,10 +16,8 @@ # -%bcond_with test - Name: perl-Log-Log4perl -Version: 1.34 +Version: 1.36 Release: 0 %define cpan_name Log-Log4perl Summary: Log4j implementation for Perl @@ -29,32 +27,11 @@ Source: http://www.cpan.org/authors/id/M/MS/MSCHILLI/%{cpan_name}-%{version}.tar.gz BuildArch: noarch BuildRoot: %{_tmppath}/%{name}-%{version}-build -%{perl_requires} BuildRequires: perl BuildRequires: perl-macros -%if %{with test} -# fix build cycle, do not enable -BuildRequires: perl(Log::Dispatch::FileRotate) >= 1.10 -BuildRequires: perl(Log::Dispatch) -BuildRequires: perl(XML::DOM) > 1.29 -BuildRequires: rrdtool -%endif -BuildRequires: perl(File::Spec) >= 0.82 -BuildRequires: perl(Test::More) >= 0.45 -# other not perl || perl-base -#BuildRequires: perl(DBI) >= 1.607 -#BuildRequires: perl(DBD::CSV) >= 0.22 -#BuildRequires: perl(IO::Socket::INET) -#### -#Requires: perl(DBI) >= 1.607 -#Requires: perl(IO::Socket::INET) -Requires: perl(Log::Dispatch) -Requires: perl(Log::Dispatch::FileRotate) >= 1.10 -Requires: perl(XML::DOM) > 1.29 -# -Requires: perl(File::Spec) >= 0.82 -Requires: perl(Test::More) >= 0.45 +# MANUAL Requires: rrdtool +%{perl_requires} %description Log::Log4perl lets you remote-control and fine-tune the logging behaviour @@ -121,11 +98,8 @@ %perl_process_packlist %perl_gen_filelist -%clean -%{__rm} -rf %{buildroot} - %files -f %{name}.files %defattr(-,root,root,755) -%doc Changes LICENSE README eg xml ldap +%doc Changes LICENSE README %changelog ++++++ Log-Log4perl-1.34.tar.gz -> Log-Log4perl-1.36.tar.gz ++++++ diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/Log-Log4perl-1.34/Changes new/Log-Log4perl-1.36/Changes --- old/Log-Log4perl-1.34/Changes 2011-11-05 06:40:01.000000000 +0100 +++ new/Log-Log4perl-1.36/Changes 2012-02-22 08:38:53.000000000 +0100 @@ -1,6 +1,20 @@ ################################################## Revision history for Log::Log4perl ################################################## + +1.36 (2012/02/11) + * (ms) [rt.cpan.org #74833] Reini Urban fixed "defined @array" for + perl 5.16 + * (ms) [rt.cpan.org #74836] Cope with Carp's questionable decision to + add a trailing dot to its messages. + +1.35 (2012/01/03) + * (ms) [rt.cpan.org #73462] Changed logwarn/logcluck/logcarp/error_warn + to warn() unconditionally and send the message to log4perl which + will log it only if the log level conditions are met. + * (ms) [rt.cpan.org #73598] Gerda Shank reported test suite problems + with DBD::CSV-0.26. Bumped up to DBD::CSV-0.33 if installed. + 1.34 (2011/11/04) * (ms) InternalDebug now replaces all instances of INTERNAL_DEBUG, not just the first one. diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/Log-Log4perl-1.34/MANIFEST new/Log-Log4perl-1.36/MANIFEST --- old/Log-Log4perl-1.34/MANIFEST 2011-11-05 06:42:09.000000000 +0100 +++ new/Log-Log4perl-1.36/MANIFEST 2012-02-22 08:39:00.000000000 +0100 @@ -146,7 +146,9 @@ t/deeper1.expected t/deeper6.expected t/deeper7.expected +t/lib/Log4perlInternalTest.pm t/testdisp.pl xml/log4j-1.2.dtd xml/log4perl.dtd -META.yml Module meta-data (added by MakeMaker) +META.yml Module YAML meta-data (added by MakeMaker) +META.json Module JSON meta-data (added by MakeMaker) diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/Log-Log4perl-1.34/MANIFEST.SKIP new/Log-Log4perl-1.36/MANIFEST.SKIP --- old/Log-Log4perl-1.34/MANIFEST.SKIP 2011-11-05 06:40:02.000000000 +0100 +++ new/Log-Log4perl-1.36/MANIFEST.SKIP 2012-02-22 08:38:53.000000000 +0100 @@ -18,3 +18,5 @@ t/047-ldap.t .git test.log +MYMETA.json +MYMETA.yml diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/Log-Log4perl-1.34/META.json new/Log-Log4perl-1.36/META.json --- old/Log-Log4perl-1.34/META.json 1970-01-01 01:00:00.000000000 +0100 +++ new/Log-Log4perl-1.36/META.json 2012-02-22 08:39:00.000000000 +0100 @@ -0,0 +1,48 @@ +{ + "abstract" : "Log4j implementation for Perl", + "author" : [ + "Mike Schilli <m(a)perlmeister.com>" + ], + "dynamic_config" : 1, + "generated_by" : "ExtUtils::MakeMaker version 6.62, CPAN::Meta::Converter version 2.120351", + "license" : [ + "unknown" + ], + "meta-spec" : { + "url" : "http://search.cpan.org/perldoc?CPAN::Meta::Spec", + "version" : "2" + }, + "name" : "Log-Log4perl", + "no_index" : { + "directory" : [ + "t", + "inc" + ] + }, + "prereqs" : { + "build" : { + "requires" : { + "ExtUtils::MakeMaker" : "0" + } + }, + "configure" : { + "requires" : { + "ExtUtils::MakeMaker" : "0" + } + }, + "runtime" : { + "requires" : { + "File::Spec" : "0.82", + "Test::More" : "0.45" + } + } + }, + "release_status" : "stable", + "resources" : { + "repository" : { + "url" : "http://github.com/mschilli/log4perl" + }, + "x_MailingList" : "mailto:log4perl-devel@lists.sourceforge.net" + }, + "version" : "1.36" +} diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/Log-Log4perl-1.34/META.yml new/Log-Log4perl-1.36/META.yml --- old/Log-Log4perl-1.34/META.yml 2011-11-05 06:42:09.000000000 +0100 +++ new/Log-Log4perl-1.36/META.yml 2012-02-22 08:38:59.000000000 +0100 @@ -1,26 +1,26 @@ ---- #YAML:1.0 -name: Log-Log4perl -version: 1.34 -abstract: Log4j implementation for Perl +--- +abstract: 'Log4j implementation for Perl' author: - - Mike Schilli <m(a)perlmeister.com> -license: unknown -distribution_type: module -configure_requires: - ExtUtils::MakeMaker: 0 + - 'Mike Schilli <m(a)perlmeister.com>' build_requires: - ExtUtils::MakeMaker: 0 + ExtUtils::MakeMaker: 0 +configure_requires: + ExtUtils::MakeMaker: 0 +dynamic_config: 1 +generated_by: 'ExtUtils::MakeMaker version 6.62, CPAN::Meta::Converter version 2.120351' +license: unknown +meta-spec: + url: http://module-build.sourceforge.net/META-spec-v1.4.html + version: 1.4 +name: Log-Log4perl +no_index: + directory: + - t + - inc requires: - File::Spec: 0.82 - Test::More: 0.45 + File::Spec: 0.82 + Test::More: 0.45 resources: - MailingList: mailto:log4perl-devel@lists.sourceforge.net - repository: http://github.com/mschilli/log4perl -no_index: - directory: - - t - - inc -generated_by: ExtUtils::MakeMaker version 6.55_02 -meta-spec: - url: http://module-build.sourceforge.net/META-spec-v1.4.html - version: 1.4 + repository: http://github.com/mschilli/log4perl + x_MailingList: mailto:log4perl-devel@lists.sourceforge.net +version: 1.36 diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/Log-Log4perl-1.34/README new/Log-Log4perl-1.36/README --- old/Log-Log4perl-1.34/README 2011-11-05 06:42:08.000000000 +0100 +++ new/Log-Log4perl-1.36/README 2012-02-22 08:38:59.000000000 +0100 @@ -1,5 +1,5 @@ ###################################################################### - Log::Log4perl 1.34 + Log::Log4perl 1.36 ###################################################################### NAME @@ -277,13 +277,21 @@ you can use the following: - $logger->logwarn(); $logger->logdie(); - These print out log messages in the WARN and FATAL level, respectively, - and then call the built-in warn() and die() functions. Since there is an - ERROR level between WARN and FATAL, there are two additional helper - functions in case you'd like to use ERROR for either warn() or die(): + And if instead of using + + warn($message); + $logger->warn($message); + + to both issue a warning via Perl's warn() mechanism and make sure you + have the same message in the log file as well, use: + + $logger->logwarn(); + + Since there is an ERROR level between WARN and FATAL, there are two + additional helper functions in case you'd like to use ERROR for either + warn() or die(): $logger->error_warn(); $logger->error_die(); diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/Log-Log4perl-1.34/lib/Log/Log4perl/Config.pm new/Log-Log4perl-1.36/lib/Log/Log4perl/Config.pm --- old/Log-Log4perl-1.34/lib/Log/Log4perl/Config.pm 2011-11-05 06:40:02.000000000 +0100 +++ new/Log-Log4perl-1.36/lib/Log/Log4perl/Config.pm 2012-02-22 08:38:53.000000000 +0100 @@ -872,7 +872,7 @@ } else { # give back 'undef' instead of an empty arrayref - unless( defined @Log::Log4perl::ALLOWED_CODE_OPS_IN_CONFIG_FILE ) { + unless( @Log::Log4perl::ALLOWED_CODE_OPS_IN_CONFIG_FILE ) { return; } } diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/Log-Log4perl-1.34/lib/Log/Log4perl/Logger.pm new/Log-Log4perl-1.36/lib/Log/Log4perl/Logger.pm --- old/Log-Log4perl-1.34/lib/Log/Log4perl/Logger.pm 2011-11-05 06:40:02.000000000 +0100 +++ new/Log-Log4perl-1.36/lib/Log/Log4perl/Logger.pm 2012-02-22 08:38:53.000000000 +0100 @@ -862,8 +862,9 @@ my @chomped = @_; chomp($chomped[-1]); $self->warn(@chomped); - $self->and_warn(@_); } + + $self->and_warn(@_); } ################################################## @@ -923,8 +924,9 @@ foreach (split(/\n/, $message)) { $self->warn("$_\n"); } - Carp::cluck($msg); } + + Carp::cluck($msg); } ################################################## @@ -944,8 +946,9 @@ foreach (split(/\n/, $message)) { $self->warn("$_\n"); } - Carp::carp($msg) if $Log::Log4perl::LOGDIE_MESSAGE_ON_STDERR; } + + Carp::carp($msg); } ################################################## @@ -1012,8 +1015,9 @@ if ($self->is_error()) { $self->error(@_); - $self->and_warn(@_); } + + $self->and_warn(@_); } ################################################## diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/Log-Log4perl-1.34/lib/Log/Log4perl.pm new/Log-Log4perl-1.36/lib/Log/Log4perl.pm --- old/Log-Log4perl-1.34/lib/Log/Log4perl.pm 2011-11-05 06:40:13.000000000 +0100 +++ new/Log-Log4perl-1.36/lib/Log/Log4perl.pm 2012-02-22 08:38:53.000000000 +0100 @@ -14,7 +14,7 @@ use Log::Log4perl::Config; use Log::Log4perl::Appender; -our $VERSION = '1.34'; +our $VERSION = '1.36'; # set this to '1' if you're using a wrapper # around Log::Log4perl @@ -898,11 +898,19 @@ you can use the following: - $logger->logwarn(); $logger->logdie(); -These print out log messages in the WARN and FATAL level, respectively, -and then call the built-in warn() and die() functions. Since there is +And if instead of using + + warn($message); + $logger->warn($message); + +to both issue a warning via Perl's warn() mechanism and make sure you have +the same message in the log file as well, use: + + $logger->logwarn(); + +Since there is an ERROR level between WARN and FATAL, there are two additional helper functions in case you'd like to use ERROR for either warn() or die(): diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/Log-Log4perl-1.34/t/022Wrap.t new/Log-Log4perl-1.36/t/022Wrap.t --- old/Log-Log4perl-1.34/t/022Wrap.t 2011-11-05 06:40:03.000000000 +0100 +++ new/Log-Log4perl-1.36/t/022Wrap.t 2012-02-22 08:38:53.000000000 +0100 @@ -74,6 +74,10 @@ my $buf = $app0->buffer(); $buf =~ s#(\S+022Wrap\.t)#basename( $1 )#eg; +# [rt 74836] Carp.pm added a dot at the end with 1.25. +# Be dot-agnostic. +$buf =~ s/\.$//; + is($buf, "File: 022Wrap.t Line number: $line package: main " . "trace: at 022Wrap.t line $line", @@ -87,7 +91,10 @@ $rootlogger->debug("Hello"); # Win32 +# [rt 74836] Carp.pm added a dot at the end with 1.25. +# Be dot-agnostic. $buf = $app0->buffer(); +$buf =~ s/\.$//; $buf =~ s#(\S+022Wrap\.t)#basename( $1 )#eg; is($buf, diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/Log-Log4perl-1.34/t/024WarnDieCarp.t new/Log-Log4perl-1.36/t/024WarnDieCarp.t --- old/Log-Log4perl-1.34/t/024WarnDieCarp.t 2011-11-05 06:40:03.000000000 +0100 +++ new/Log-Log4perl-1.36/t/024WarnDieCarp.t 2012-02-22 08:38:53.000000000 +0100 @@ -62,12 +62,28 @@ eval { &$method($in_str) }; - unlike($warnstr, qr/$out_str/, + unlike($warnstr, qr/\Q$out_str\E/, "$mname($in_str): STDERR does NOT contain \"$out_str\""); unlike($app->buffer(), qr/$out_str/, "$mname($in_str): Buffer does NOT contain \"$out_str\""); } +# warn() still prints to stderr, but nothing gets logged +sub warndietest_stderronly { + my ($method, $in_str, $out_str, $app, $mname) = @_; + + eval { &$method($in_str) }; + + my($pkg, $file, $line) = caller(); + + # it's in stderr + like($warnstr, qr/\Q$out_str\E/, + "$mname($in_str): STDERR does contain \"$out_str\" ($file:$line)"); + # but not logged by log4perl + unlike($app->buffer(), qr/$out_str/, + "$mname($in_str): Buffer does NOT contain \"$out_str\" ($file:$line)"); +} + # same as above, just look for no output in buffer, but output in STDERR sub dietest_nooutput { my ($method, $in_str, $out_str, $app, $mname) = @_; @@ -107,7 +123,8 @@ } ###################################################################### -# change the log level to ERROR... warns should produce nothing now +# change the log level to ERROR... warns should produce nothing in +# log4perl now, but logwarn still triggers warn() $log->level($ERROR); @@ -119,7 +136,7 @@ foreach my $f ("logwarn", "logcarp", "logcluck", ) { - warndietest_nooutput(sub {$log->$f(@_)}, "Test $test: $f", "Test $test: $f", $app, "$f"); + warndietest_stderronly(sub {$log->$f(@_)}, "Test $test: $f", "Test $test: $f", $app, "$f"); $test++; } @@ -129,7 +146,7 @@ $log->level($OFF); # $OFF == $FATAL... although I suspect thats a bug in the log4j spec foreach my $f ("logwarn", "logcarp", "logcluck", "error_warn") { - warndietest_nooutput(sub {$log->$f(@_)}, "Test $test: $f", "Test $test: $f", $app, "$f"); + warndietest_stderronly(sub {$log->$f(@_)}, "Test $test: $f", "Test $test: $f", $app, "$f"); $test++; } diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/Log-Log4perl-1.34/t/034DBI.t new/Log-Log4perl-1.36/t/034DBI.t --- old/Log-Log4perl-1.34/t/034DBI.t 2011-11-05 06:40:03.000000000 +0100 +++ new/Log-Log4perl-1.36/t/034DBI.t 2012-02-22 08:38:53.000000000 +0100 @@ -10,23 +10,35 @@ } } -use Test::More; +BEGIN { + use FindBin qw($Bin); + use lib "$Bin/lib"; + require Log4perlInternalTest; +} +use Test::More; use Log::Log4perl; use warnings; use strict; BEGIN { + my $minversion = \%Log::Log4perl::Internal::Test::MINVERSION; eval { require DBI; + die if $DBI::VERSION < $minversion->{ "DBI" }; + require DBD::CSV; + die if $DBD::CSV::VERSION < $minversion->{ "DBD::CSV" }; + require SQL::Statement; - die if $DBI::VERSION < 1.607; - die if $DBD::CSV::VERSION < 0.22; - die if $SQL::Statement::VERSION < 1.20; + die if $SQL::Statement::VERSION < $minversion->{ "SQL::Statement" }; }; if ($@) { - plan skip_all => "DBI 1.607 or DBD::CSV 0.22 or SQL::Statement 1.20 not installed, skipping tests\n"; + plan skip_all => + "DBI $minversion->{ DBI } or " . + "DBD::CSV $minversion->{'DBD::CSV'} or " . + "SQL::Statement $minversion->{'SQL::Statement'} " . + "not installed, skipping tests\n"; }else{ plan tests => 32; } diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/Log-Log4perl-1.34/t/035JDBCAppender.t new/Log-Log4perl-1.36/t/035JDBCAppender.t --- old/Log-Log4perl-1.34/t/035JDBCAppender.t 2011-11-05 06:40:03.000000000 +0100 +++ new/Log-Log4perl-1.36/t/035JDBCAppender.t 2012-02-22 08:38:53.000000000 +0100 @@ -3,6 +3,9 @@ # Kevin Goess <cpan(a)goess.org> ########################################### +use strict; +use warnings; + BEGIN { if($ENV{INTERNAL_DEBUG}) { require Log::Log4perl::InternalDebug; @@ -15,12 +18,22 @@ use Log::Log4perl; BEGIN { + use FindBin qw($Bin); + use lib "$Bin/lib"; + require Log4perlInternalTest; +} + +BEGIN { + my $minversion = \%Log::Log4perl::Internal::Test::MINVERSION; eval { require DBD::CSV; + die if $DBD::CSV::VERSION < $minversion->{ "DBD::CSV" }; + require Log::Dispatch; }; if ($@) { - plan skip_all => "only with Log::Dispatch and DBD::CSV"; + plan skip_all => + "only with Log::Dispatch and DBD::CSV $minversion->{'DBD::CSV'}"; }else{ plan tests => 14; } diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/Log-Log4perl-1.34/t/051Extra.t new/Log-Log4perl-1.36/t/051Extra.t --- old/Log-Log4perl-1.34/t/051Extra.t 2011-11-05 06:40:03.000000000 +0100 +++ new/Log-Log4perl-1.36/t/051Extra.t 2012-02-22 08:38:53.000000000 +0100 @@ -68,7 +68,7 @@ my $line_ref = __LINE__ + 1; LOGCARP("logcarp"); -is(readstderr(), "", "No output to stderr"); +like(readstderr(), qr/logcarp at /, "Output to stderr"); SKIP: { use Carp; skip "Detected buggy Carp.pm (upgrade to perl-5.8.*)", 3 unless defined $Carp::VERSION; @@ -76,7 +76,7 @@ $line_ref += 9; $buf->buffer(""); LOGCARP("logcarp"); - is(readstderr(), "", "No output to stderr"); + like(readstderr(), qr/logcarp at /, "Output to stderr"); like($buf->buffer(), qr/logcarp.*$line_ref/, "Appender output intact"); } diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/Log-Log4perl-1.34/t/lib/Log4perlInternalTest.pm new/Log-Log4perl-1.36/t/lib/Log4perlInternalTest.pm --- old/Log-Log4perl-1.34/t/lib/Log4perlInternalTest.pm 1970-01-01 01:00:00.000000000 +0100 +++ new/Log-Log4perl-1.36/t/lib/Log4perlInternalTest.pm 2012-02-22 08:38:53.000000000 +0100 @@ -0,0 +1,33 @@ +package Log::Log4perl::Internal::Test; +use strict; +use warnings; + +# We don't require any of these modules for testing, but if they're +# installed, we require minimal versions. + +our %MINVERSION = qw( + DBI 1.607 + DBD::CSV 0.33 + SQL::Statement 1.20 +); + +1; + +__END__ + +=head1 NAME + +Log::Log4perl::Internal::Test - Internal Test Utilities for Log4perl + +=head1 SYNOPSIS + + use Log::Log4perl::Internal::Test; + +=head1 DESCRIPTION + +Some general-purpose test routines and constants to be used in the Log4perl +test suite. + +=head1 AUTHOR + +2012, Mike Schilli <cpan(a)perlmeister.com> -- To unsubscribe, e-mail: opensuse-commit+unsubscribe(a)opensuse.org For additional commands, e-mail: opensuse-commit+help(a)opensuse.org

1 0

commit perl-Gravatar-URL for openSUSE:Factory
by root＠hilbert.suse.de 31 May '12

31 May '12

Hello community, here is the log from the commit of package perl-Gravatar-URL for openSUSE:Factory checked in at 2012-05-31 17:08:21 ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ Comparing /work/SRC/openSUSE:Factory/perl-Gravatar-URL (Old) and /work/SRC/openSUSE:Factory/.perl-Gravatar-URL.new (New) ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ Package is "perl-Gravatar-URL", Maintainer is "" Changes: -------- --- /work/SRC/openSUSE:Factory/perl-Gravatar-URL/perl-Gravatar-URL.changes 2012-02-14 19:05:00.000000000 +0100 +++ /work/SRC/openSUSE:Factory/.perl-Gravatar-URL.new/perl-Gravatar-URL.changes 2012-05-31 17:08:47.000000000 +0200 @@ -1,0 +2,10 @@ +Tue May 29 13:54:04 UTC 2012 - coolo(a)suse.com + +- updated to 1.06 + Bug fixes + * Fixed some undef warnings during sanitization. + + Test fixes + * Adapt to changes in Carp 1.25 [RT#75523] + +------------------------------------------------------------------- Old: ---- Gravatar-URL-1.05.tar.gz New: ---- Gravatar-URL-1.06.tar.gz ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ Other differences: ------------------ ++++++ perl-Gravatar-URL.spec ++++++ --- /var/tmp/diff_new_pack.K2H4gu/_old 2012-05-31 17:08:48.000000000 +0200 +++ /var/tmp/diff_new_pack.K2H4gu/_new 2012-05-31 17:08:48.000000000 +0200 @@ -17,14 +17,14 @@ Name: perl-Gravatar-URL -Version: 1.05 +Version: 1.06 Release: 0 %define cpan_name Gravatar-URL Summary: Make URLs for Gravatars from an email address -License: GPL-1.0+ or Artistic-1.0 +License: Artistic-1.0 or GPL-1.0+ Group: Development/Libraries/Perl Url: http://search.cpan.org/dist/Gravatar-URL/ -Source: http://www.cpan.org/authors/id/F/FM/FMARIER/%{cpan_name}-%{version}.tar.gz +Source: http://www.cpan.org/authors/id/M/MS/MSCHWERN/%{cpan_name}-%{version}.tar.gz BuildArch: noarch BuildRoot: %{_tmppath}/%{name}-%{version}-build BuildRequires: perl @@ -35,10 +35,12 @@ BuildRequires: perl(Test::Warn) >= 0.11 BuildRequires: perl(URI::Escape) BuildRequires: perl(parent) +#BuildRequires: perl(Gravatar::URL) +#BuildRequires: perl(Unicornify::URL) Requires: perl(Digest::SHA) Requires: perl(Net::DNS::Resolver) -Requires: perl(parent) Requires: perl(URI::Escape) +Requires: perl(parent) %{perl_requires} %description @@ -67,9 +69,6 @@ ./Build install destdir=%{buildroot} create_packlist=0 %perl_gen_filelist -%clean -%{__rm} -rf %{buildroot} - %files -f %{name}.files %defattr(-,root,root,755) %doc Changes ++++++ Gravatar-URL-1.05.tar.gz -> Gravatar-URL-1.06.tar.gz ++++++ diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/Gravatar-URL-1.05/Changes new/Gravatar-URL-1.06/Changes --- old/Gravatar-URL-1.05/Changes 2011-07-06 12:48:05.000000000 +0200 +++ new/Gravatar-URL-1.06/Changes 2012-03-27 14:00:52.000000000 +0200 @@ -1,3 +1,10 @@ +1.06 Tue Mar 27 12:55:30 BST 2012 + Bug fixes + * Fixed some undef warnings during sanitization. + + Test fixes + * Adapt to changes in Carp 1.25 [rt.cpan.org 75523] + 1.05 Wed Jul 6 22:40:06 NZST 2011 Security fix * Sanitize DNS results in Libravatar::URL diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/Gravatar-URL-1.05/MANIFEST new/Gravatar-URL-1.06/MANIFEST --- old/Gravatar-URL-1.05/MANIFEST 2011-07-06 12:48:05.000000000 +0200 +++ new/Gravatar-URL-1.06/MANIFEST 2012-03-27 14:00:52.000000000 +0200 @@ -5,6 +5,7 @@ lib/Unicornify/URL.pm MANIFEST This list of files MANIFEST.SKIP +META.json META.yml t/deprecated.t t/error.t diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/Gravatar-URL-1.05/META.json new/Gravatar-URL-1.06/META.json --- old/Gravatar-URL-1.05/META.json 1970-01-01 01:00:00.000000000 +0100 +++ new/Gravatar-URL-1.06/META.json 2012-03-27 14:00:52.000000000 +0200 @@ -0,0 +1,70 @@ +{ + "abstract" : "Make URLs for Gravatars from an email address", + "author" : [ + "unknown" + ], + "dynamic_config" : 1, + "generated_by" : "Module::Build version 0.38, CPAN::Meta::Converter version 2.112621", + "keywords" : [ + "Gravatar" + ], + "license" : [ + "perl_5" + ], + "meta-spec" : { + "url" : "http://search.cpan.org/perldoc?CPAN::Meta::Spec", + "version" : "2" + }, + "name" : "Gravatar-URL", + "prereqs" : { + "build" : { + "requires" : { + "Test::More" : "0.4", + "Test::Warn" : "0.11" + } + }, + "configure" : { + "requires" : { + "Module::Build" : "0.2808" + } + }, + "runtime" : { + "requires" : { + "Carp" : 0, + "Digest::MD5" : 0, + "Digest::SHA" : 0, + "Net::DNS::Resolver" : 0, + "URI::Escape" : 0, + "parent" : 0, + "perl" : "v5.6.0" + } + } + }, + "provides" : { + "Gravatar::URL" : { + "file" : "lib/Gravatar/URL.pm", + "version" : "1.06" + }, + "Libravatar::URL" : { + "file" : "lib/Libravatar/URL.pm", + "version" : "1.06" + }, + "Unicornify::URL" : { + "file" : "lib/Unicornify/URL.pm", + "version" : "1.06" + } + }, + "release_status" : "stable", + "resources" : { + "bugtracker" : { + "web" : "http://rt.cpan.org/Public/Dist/Display.html?Name=Gravatar-URL" + }, + "license" : [ + "http://dev.perl.org/licenses/" + ], + "repository" : { + "url" : "http://github.com/schwern/gravatar-url/tree/master" + } + }, + "version" : "1.06" +} diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/Gravatar-URL-1.05/META.yml new/Gravatar-URL-1.06/META.yml --- old/Gravatar-URL-1.05/META.yml 2011-07-06 12:48:05.000000000 +0200 +++ new/Gravatar-URL-1.06/META.yml 2012-03-27 14:00:52.000000000 +0200 @@ -1,12 +1,14 @@ --- abstract: 'Make URLs for Gravatars from an email address' -author: [] +author: + - unknown build_requires: Test::More: 0.4 Test::Warn: 0.11 configure_requires: Module::Build: 0.2808 -generated_by: 'Module::Build version 0.3603' +dynamic_config: 1 +generated_by: 'Module::Build version 0.38, CPAN::Meta::Converter version 2.112621' keywords: - Gravatar license: perl @@ -17,13 +19,13 @@ provides: Gravatar::URL: file: lib/Gravatar/URL.pm - version: 1.05 + version: 1.06 Libravatar::URL: file: lib/Libravatar/URL.pm - version: 1.05 + version: 1.06 Unicornify::URL: file: lib/Unicornify/URL.pm - version: 1.05 + version: 1.06 requires: Carp: 0 Digest::MD5: 0 @@ -36,4 +38,4 @@ bugtracker: http://rt.cpan.org/Public/Dist/Display.html?Name=Gravatar-URL license: http://dev.perl.org/licenses/ repository: http://github.com/schwern/gravatar-url/tree/master -version: 1.05 +version: 1.06 diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/Gravatar-URL-1.05/SIGNATURE new/Gravatar-URL-1.06/SIGNATURE --- old/Gravatar-URL-1.05/SIGNATURE 2011-07-06 12:48:06.000000000 +0200 +++ new/Gravatar-URL-1.06/SIGNATURE 2012-03-27 14:00:52.000000000 +0200 @@ -12,36 +12,27 @@ not run its Makefile.PL or Build.PL. -----BEGIN PGP SIGNED MESSAGE----- -Hash: SHA256 +Hash: SHA1 SHA1 7167d0e20bd720b44dd6537748b258de132d4931 Build.PL -SHA1 0502a2e8c361179910ff3392944d933f7a979b23 Changes -SHA1 18bb6448d08c7658c6991171dbee9b761cf72e8d MANIFEST +SHA1 bd75123c13e28ada7281b6c9cce9ded20f06b56b Changes +SHA1 60a6b73a12bd5d7cb88bc589aadbd9590421e0b2 MANIFEST SHA1 8ca6e2e38708e91e4bd249dc854520a142c3cafe MANIFEST.SKIP -SHA1 26950201abf7203cf20e9c552cc18ffdf0bf01d1 META.yml -SHA1 a7b7bd01200e13a6745ffb939bc332e3a0592268 lib/Gravatar/URL.pm -SHA1 2ce4d71a777ff5d809598005f238c5fc401a1647 lib/Libravatar/URL.pm -SHA1 ee00760fb95aec563a4da0fd6ac247fa90f5920f lib/Unicornify/URL.pm +SHA1 42bff277d510bd5f2759b318afa6773048382f2a META.json +SHA1 95859b05f633a09e377d0f1f3631a3173ea1dece META.yml +SHA1 9656b7f3e34510e84f9e10d9d640459dea9e88cc lib/Gravatar/URL.pm +SHA1 e1317787c350c56d78f1fed629b7496067a4e9ac lib/Libravatar/URL.pm +SHA1 42e2aaca70e7c05e79a474783bb4fbf036bf4c17 lib/Unicornify/URL.pm SHA1 02f21c26f52380259046ea05ae9d560b8a5c5072 t/deprecated.t -SHA1 0250d25f32bcfe6dafab0b3892f4575959ef6890 t/error.t +SHA1 8d1cd74b2e6625fdd68062ed6fb9935eded6cdd4 t/error.t SHA1 3b4f3259bb95a336b73ecd2c06bf96dd30637a0a t/id.t SHA1 c1f9d8c33601bda1bc92ca23c1904e62efb36ed2 t/libravatar.t SHA1 7bdb7b0b2b440eaade3bb2a968c4919c7c2d4666 t/unicornify.t SHA1 1b8f6257f03be54ba3e0d39973b3ff0113785afa t/url.t -----BEGIN PGP SIGNATURE----- -Version: GnuPG v1.4.11 (GNU/Linux) +Version: GnuPG v2.0.18 (Darwin) -iQIcBAEBCAAGBQJOFD1lAAoJEBYoHy4AfJjRkMgQAKUxU7He/MhwnVnJcKcGmgue -p8+5QV+1FNktZyRKsjWlQt2ChZ59nyRr7pnV9WVg0ZODcWTNXQYvG40YcaDcXPaC -GQ41hlbQYusoioY+2YnQckLhP7FPwCrpsTl/IHwW1wg+lj/U4Eb0xLQYQcAVH7Wq -LFGM/2Gnx1k/y66rlZT292gwSYsP5YOCOQpzzxYzfZs90GRAIFDIljKRs9S5SOWe -4naOKtMJO6knaMTNI+4zXDJUGUsflnUuJ4PE6KGnToIESlIGyxn9cV2rIkEY/ozL -7KcNQB/Y+PrgIpZ9kfIv+NT2vR3jJk4CbSj6dUSenN8mtcfWbQ5b6g3SGbuCm9ei -sdisMmp6eoopdpFtidiItqD3tvibY+a5GMN+pYSvQLEFJUUuHUHwxL/BfAyE9ODk -mYFXwtzUBN1t4CbSNXDxZ8IZpRWZJerMj+6RX+mgU5N1EKgVj/aXIILxV6gzTvWg -q09xQDU9ZaN1QDlZ/UGxxCCe29Pqe8R23CGTAGIZwU//uPGxrDc7WR9hzfQMDq9U -wHw4y0SBW2cYdf08ZjqlRvQN1bXOqRLT9sZOMsPtui3pUQaw2JmP+ob3dYXeytzL -LavcfhQFoZ4XatdGQzu08UNKc/s2oi4per5ZFi3xWNjBtdJfJFOLDar/e3CpPsem -4mUio8/ztrDII4m0ao/t -=r7yG +iEYEARECAAYFAk9xq/QACgkQWMohlhD1Qye04gCgsiVO+Tqr87Iwc9lbT/cl2JJS +WMMAn2Tj4Xl5AMEJp+O35/u+bkq4Zq1u +=CXG6 -----END PGP SIGNATURE----- diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/Gravatar-URL-1.05/lib/Gravatar/URL.pm new/Gravatar-URL-1.06/lib/Gravatar/URL.pm --- old/Gravatar-URL-1.05/lib/Gravatar/URL.pm 2011-07-06 12:48:05.000000000 +0200 +++ new/Gravatar-URL-1.06/lib/Gravatar/URL.pm 2012-03-27 14:00:52.000000000 +0200 @@ -7,7 +7,7 @@ use Digest::MD5 qw(md5_hex); use Carp; -our $VERSION = '1.05'; +our $VERSION = '1.06'; use parent 'Exporter'; our @EXPORT = qw( diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/Gravatar-URL-1.05/lib/Libravatar/URL.pm new/Gravatar-URL-1.06/lib/Libravatar/URL.pm --- old/Gravatar-URL-1.05/lib/Libravatar/URL.pm 2011-07-06 12:48:05.000000000 +0200 +++ new/Gravatar-URL-1.06/lib/Libravatar/URL.pm 2012-03-27 14:00:52.000000000 +0200 @@ -7,7 +7,7 @@ use Digest::SHA qw(sha256_hex); use Carp; -our $VERSION = '1.05'; +our $VERSION = '1.06'; use parent 'Exporter'; our @EXPORT = qw( @@ -200,10 +200,10 @@ sub sanitize_target { my ( $target, $port ) = @_; - unless ( $target =~ m/^[0-9a-zA-Z\-.]+$/ ) { + unless ( defined $target && $target =~ m/^[0-9a-zA-Z\-.]+$/ ) { return ( undef, undef ); } - unless ( $port =~ m/^[0-9]{1,5}$/ ) { + unless ( defined $port && $port =~ m/^[0-9]{1,5}$/ ) { return ( undef, undef ); } diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/Gravatar-URL-1.05/lib/Unicornify/URL.pm new/Gravatar-URL-1.06/lib/Unicornify/URL.pm --- old/Gravatar-URL-1.05/lib/Unicornify/URL.pm 2011-07-06 12:48:05.000000000 +0200 +++ new/Gravatar-URL-1.06/lib/Unicornify/URL.pm 2012-03-27 14:00:52.000000000 +0200 @@ -3,7 +3,7 @@ use strict; use warnings; -our $VERSION = '1.05'; +our $VERSION = '1.06'; use Gravatar::URL qw(gravatar_url); diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/Gravatar-URL-1.05/t/error.t new/Gravatar-URL-1.06/t/error.t --- old/Gravatar-URL-1.05/t/error.t 2011-07-06 12:48:05.000000000 +0200 +++ new/Gravatar-URL-1.06/t/error.t 2012-03-27 14:00:52.000000000 +0200 @@ -39,8 +39,9 @@ eval { gravatar_url( %$args ) }; my $error = $@; + $error =~ s/\.\n/\n/; $want = !$want ? "" - : sprintf "%s at %s line %d\n", $want, $0, __LINE__ - 4; + : sprintf "%s at %s line %d\n", $want, $0, __LINE__ - 5; my $name = join ", ", map { "$_ => '$args->{$_}'" } keys %$args; is $error, $want, "gravatar_url($name)"; -- To unsubscribe, e-mail: opensuse-commit+unsubscribe(a)opensuse.org For additional commands, e-mail: opensuse-commit+help(a)opensuse.org

1 0