rpms/perl-Perl-MinimumVersion/devel Perl-MinimumVersion-25.patch, NONE, 1.1 perl-Perl-MinimumVersion.spec, 1.14, 1.15

Marcela Mašláňová mmaslano at fedoraproject.org
Mon May 3 07:45:51 UTC 2010


Author: mmaslano

Update of /cvs/pkgs/rpms/perl-Perl-MinimumVersion/devel
In directory cvs01.phx2.fedoraproject.org:/tmp/cvs-serv6338

Modified Files:
	perl-Perl-MinimumVersion.spec 
Added Files:
	Perl-MinimumVersion-25.patch 
Log Message:
* Mon May  3 2010 Marcela Mašláňová <mmaslano at redhat.com> - 1.24-2
- for the meantime apply changes from trunk. Other builds using
 this package should succed with perl-5.12.


Perl-MinimumVersion-25.patch:
 lib/Perl/.svn/all-wcprops                                 |   11 
 lib/Perl/.svn/entries                                     |   65 
 lib/Perl/.svn/prop-base/MinimumVersion.pm.svn-base        |    5 
 lib/Perl/.svn/text-base/MinimumVersion.pm.svn-base        | 1037 ++++++++++++++
 lib/Perl/MinimumVersion.pm                                |   46 
 lib/Perl/MinimumVersion/.svn/all-wcprops                  |   11 
 lib/Perl/MinimumVersion/.svn/entries                      |   62 
 lib/Perl/MinimumVersion/.svn/text-base/Reason.pm.svn-base |   36 
 lib/Perl/MinimumVersion/Reason.pm                         |   72 
 t/02_main.t                                               |    9 
 t/03_open_3arg.t                                          |   76 -
 t/04_substr.t                                             |   64 
 t/05_foreach.t                                            |   60 
 t/06_weaken.t                                             |   66 
 t/07_splice.t                                             |   68 
 t/08_mkdir.t                                              |   64 
 t/09_pkg_name_version.t                                   |   38 
 t/10_yada_yada_yada.t                                     |   34 
 t/11_feature_bundle_512.t                                 |   36 
 t/97_meta.t                                               |   27 
 t/98_pod.t                                                |   32 
 t/99_pmv.t                                                |   32 
 22 files changed, 1619 insertions(+), 332 deletions(-)

--- NEW FILE Perl-MinimumVersion-25.patch ---
diff -urN Perl-MinimumVersion-1.24/lib.old/Perl/MinimumVersion/Reason.pm Perl-MinimumVersion-1.24/lib/Perl/MinimumVersion/Reason.pm
--- Perl-MinimumVersion-1.24/lib.old/Perl/MinimumVersion/Reason.pm	2010-01-21 22:26:15.000000000 +0100
+++ Perl-MinimumVersion-1.24/lib/Perl/MinimumVersion/Reason.pm	2010-05-03 09:23:31.000000000 +0200
@@ -1,36 +1,36 @@
-package Perl::MinimumVersion::Reason;
-
-# Simple abstraction for a syntax limitation.
-# It contains the limiting version, the rule responsible, and the
-# PPI element responsible for the limitation (if any).
-
-use 5.006;
-use strict;
-use warnings;
-
-use vars qw{$VERSION};
-BEGIN {
-	$VERSION = '1.24';
-
-	# Only needed for dev releases, comment out otherwise
-	$VERSION = eval $VERSION;
-}
-
-sub new {
-	my $class = shift;
-	return bless { @_ }, $class;
-}
-
-sub version {
-	$_[0]->{version};
-}
-
-sub rule {
-	$_[0]->{rule};
-}
-
-sub element {
-	$_[0]->{element};
-}
-
-1;
+package Perl::MinimumVersion::Reason;
+
+# Simple abstraction for a syntax limitation.
+# It contains the limiting version, the rule responsible, and the
+# PPI element responsible for the limitation (if any).
+
+use 5.006;
+use strict;
+use warnings;
+
+use vars qw{$VERSION};
+BEGIN {
+	$VERSION = '1.25';
+
+	# Only needed for dev releases, comment out otherwise
+	$VERSION = eval $VERSION;
+}
+
+sub new {
+	my $class = shift;
+	return bless { @_ }, $class;
+}
+
+sub version {
+	$_[0]->{version};
+}
+
+sub rule {
+	$_[0]->{rule};
+}
+
+sub element {
+	$_[0]->{element};
+}
+
+1;
diff -urN Perl-MinimumVersion-1.24/lib.old/Perl/MinimumVersion/.svn/all-wcprops Perl-MinimumVersion-1.24/lib/Perl/MinimumVersion/.svn/all-wcprops
--- Perl-MinimumVersion-1.24/lib.old/Perl/MinimumVersion/.svn/all-wcprops	1970-01-01 01:00:00.000000000 +0100
+++ Perl-MinimumVersion-1.24/lib/Perl/MinimumVersion/.svn/all-wcprops	2010-05-03 09:23:31.000000000 +0200
@@ -0,0 +1,11 @@
+K 25
+svn:wc:ra_dav:version-url
+V 70
+/cpan/!svn/ver/11888/trunk/Perl-MinimumVersion/lib/Perl/MinimumVersion
+END
+Reason.pm
+K 25
+svn:wc:ra_dav:version-url
+V 80
+/cpan/!svn/ver/11888/trunk/Perl-MinimumVersion/lib/Perl/MinimumVersion/Reason.pm
+END
diff -urN Perl-MinimumVersion-1.24/lib.old/Perl/MinimumVersion/.svn/entries Perl-MinimumVersion-1.24/lib/Perl/MinimumVersion/.svn/entries
--- Perl-MinimumVersion-1.24/lib.old/Perl/MinimumVersion/.svn/entries	1970-01-01 01:00:00.000000000 +0100
+++ Perl-MinimumVersion-1.24/lib/Perl/MinimumVersion/.svn/entries	2010-05-03 09:23:31.000000000 +0200
@@ -0,0 +1,62 @@
+10
+
+dir
+12099
+http://svn.ali.as/cpan/trunk/Perl-MinimumVersion/lib/Perl/MinimumVersion
+http://svn.ali.as/cpan
+
+
+
+2010-04-11T14:30:55.494658Z
+11888
+chorny at cpan.org
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+88f4d9cd-8a04-0410-9d60-8f63309c3137
+
+Reason.pm
+file
+
+
+
+
+2010-05-03T07:23:31.091810Z
+3ece6d1a31707473047d796b366510bc
+2010-04-11T14:30:55.494658Z
+11888
+chorny at cpan.org
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+586
+
diff -urN Perl-MinimumVersion-1.24/lib.old/Perl/MinimumVersion/.svn/text-base/Reason.pm.svn-base Perl-MinimumVersion-1.24/lib/Perl/MinimumVersion/.svn/text-base/Reason.pm.svn-base
--- Perl-MinimumVersion-1.24/lib.old/Perl/MinimumVersion/.svn/text-base/Reason.pm.svn-base	1970-01-01 01:00:00.000000000 +0100
+++ Perl-MinimumVersion-1.24/lib/Perl/MinimumVersion/.svn/text-base/Reason.pm.svn-base	2010-05-03 09:23:31.000000000 +0200
@@ -0,0 +1,36 @@
+package Perl::MinimumVersion::Reason;
+
+# Simple abstraction for a syntax limitation.
+# It contains the limiting version, the rule responsible, and the
+# PPI element responsible for the limitation (if any).
+
+use 5.006;
+use strict;
+use warnings;
+
+use vars qw{$VERSION};
+BEGIN {
+	$VERSION = '1.25';
+
+	# Only needed for dev releases, comment out otherwise
+	$VERSION = eval $VERSION;
+}
+
+sub new {
+	my $class = shift;
+	return bless { @_ }, $class;
+}
+
+sub version {
+	$_[0]->{version};
+}
+
+sub rule {
+	$_[0]->{rule};
+}
+
+sub element {
+	$_[0]->{element};
+}
+
+1;
diff -urN Perl-MinimumVersion-1.24/lib.old/Perl/MinimumVersion.pm Perl-MinimumVersion-1.24/lib/Perl/MinimumVersion.pm
--- Perl-MinimumVersion-1.24/lib.old/Perl/MinimumVersion.pm	2010-01-21 22:26:15.000000000 +0100
[...1708 lines suppressed...]
+    q{package Foo 1;},
+    q{package Foo::Bar 1;},
+    q{package Foo 1;},
+    q{package Foo 1.;},
+    q{package Foo::Bar::Baz 1.000},
+    q{package Foo::Bar::Baz 1.1.1},
+);
+plan tests =>(@examples_not+ at examples_yes);
+foreach my $example (@examples_not) {
+	my $p = Perl::MinimumVersion->new(\$example);
+	is( $p->_pkg_name_version, '', $example )
+	  or do { diag "\$\@: $@" if $@ };
+}
+foreach my $example (@examples_yes) {
+	my $p = Perl::MinimumVersion->new(\$example);
+	ok( $p->_pkg_name_version, $example )
+	  or do { diag "\$\@: $@" if $@ };
+}
+
diff -urN Perl-MinimumVersion-1.24/t.old/10_yada_yada_yada.t Perl-MinimumVersion-1.24/t/10_yada_yada_yada.t
--- Perl-MinimumVersion-1.24/t.old/10_yada_yada_yada.t	1970-01-01 01:00:00.000000000 +0100
+++ Perl-MinimumVersion-1.24/t/10_yada_yada_yada.t	2010-05-03 09:23:30.000000000 +0200
@@ -0,0 +1,34 @@
+#!/usr/bin/perl -w
+
+use strict;
+BEGIN {
+	$|  = 1;
+	$^W = 1;
+}
+
+use Test::More;
+
+#use version;
+use Perl::MinimumVersion;
+my @examples_not=(
+    q{'foo'.'foo'}, # okay, okay, adding close examples is a TODO
+    q{sub foo {}},
+);
+my @examples_yes=(
+    q{...},
+    q{...;},
+    q{if(1){...}},
+    q{sub foo {...}},
+);
+plan tests =>(@examples_not+ at examples_yes);
+foreach my $example (@examples_not) {
+	my $p = Perl::MinimumVersion->new(\$example);
+	is( $p->_yada_yada_yada, '', $example )
+	  or do { diag "\$\@: $@" if $@ };
+}
+foreach my $example (@examples_yes) {
+	my $p = Perl::MinimumVersion->new(\$example);
+	ok( $p->_yada_yada_yada, $example )
+	  or do { diag "\$\@: $@" if $@ };
+}
+
diff -urN Perl-MinimumVersion-1.24/t.old/11_feature_bundle_512.t Perl-MinimumVersion-1.24/t/11_feature_bundle_512.t
--- Perl-MinimumVersion-1.24/t.old/11_feature_bundle_512.t	1970-01-01 01:00:00.000000000 +0100
+++ Perl-MinimumVersion-1.24/t/11_feature_bundle_512.t	2010-05-03 09:23:30.000000000 +0200
@@ -0,0 +1,36 @@
+#!/usr/bin/perl -w
+
+use strict;
+BEGIN {
+	$|  = 1;
+	$^W = 1;
+}
+
+use Test::More;
+
+#use version;
+use Perl::MinimumVersion;
+my @examples_not=(
+    q{use feature ':5.8'},
+    q{use feature ':5.10'},
+    q{use feature},
+    q{use feature 'say', ':5.10';},
+);
+my @examples_yes=(
+    q{use feature ':5.8', ':5.12'},
+    q{use feature ':5.12'},
+    q{use feature ':5.12', "say"},
+    q{use feature ':5.12';},
+);
+plan tests =>(@examples_not+ at examples_yes);
+foreach my $example (@examples_not) {
+	my $p = Perl::MinimumVersion->new(\$example);
+	is( $p->_feature_bundle_5_12, '', $example )
+	  or do { diag "\$\@: $@" if $@ };
+}
+foreach my $example (@examples_yes) {
+	my $p = Perl::MinimumVersion->new(\$example);
+	ok( $p->_feature_bundle_5_12, $example )
+	  or do { diag "\$\@: $@" if $@ };
+}
+
diff -urN Perl-MinimumVersion-1.24/t.old/97_meta.t Perl-MinimumVersion-1.24/t/97_meta.t
--- Perl-MinimumVersion-1.24/t.old/97_meta.t	2010-01-21 22:26:15.000000000 +0100
+++ Perl-MinimumVersion-1.24/t/97_meta.t	1970-01-01 01:00:00.000000000 +0100
@@ -1,27 +0,0 @@
-#!/usr/bin/perl
-
-# Test that our META.yml file matches the current specification.
-
-use strict;
-BEGIN {
-	$|  = 1;
-	$^W = 1;
-}
-
-my $MODULE = 'Test::CPAN::Meta 0.12';
-
-# Don't run tests for installs
-use Test::More;
-unless ( $ENV{AUTOMATED_TESTING} or $ENV{RELEASE_TESTING} ) {
-	plan( skip_all => "Author tests not required for installation" );
-}
-
-# Load the testing module
-eval "use $MODULE";
-if ( $@ ) {
-	$ENV{RELEASE_TESTING}
-	? die( "Failed to load required release-testing module $MODULE" )
-	: plan( skip_all => "$MODULE not available for testing" );
-}
-
-meta_yaml_ok();
diff -urN Perl-MinimumVersion-1.24/t.old/98_pod.t Perl-MinimumVersion-1.24/t/98_pod.t
--- Perl-MinimumVersion-1.24/t.old/98_pod.t	2010-01-21 22:26:15.000000000 +0100
+++ Perl-MinimumVersion-1.24/t/98_pod.t	1970-01-01 01:00:00.000000000 +0100
@@ -1,32 +0,0 @@
-#!/usr/bin/perl
-
-# Test that the syntax of our POD documentation is valid
-
-use strict;
-BEGIN {
-	$|  = 1;
-	$^W = 1;
-}
-
-my @MODULES = (
-	'Pod::Simple 3.07',
-	'Test::Pod 1.26',
-);
-
-# Don't run tests for installs
-use Test::More;
-unless ( $ENV{AUTOMATED_TESTING} or $ENV{RELEASE_TESTING} ) {
-	plan( skip_all => "Author tests not required for installation" );
-}
-
-# Load the testing modules
-foreach my $MODULE ( @MODULES ) {
-	eval "use $MODULE";
-	if ( $@ ) {
-		$ENV{RELEASE_TESTING}
-		? die( "Failed to load required release-testing module $MODULE" )
-		: plan( skip_all => "$MODULE not available for testing" );
-	}
-}
-
-all_pod_files_ok();
diff -urN Perl-MinimumVersion-1.24/t.old/99_pmv.t Perl-MinimumVersion-1.24/t/99_pmv.t
--- Perl-MinimumVersion-1.24/t.old/99_pmv.t	2010-01-21 22:26:15.000000000 +0100
+++ Perl-MinimumVersion-1.24/t/99_pmv.t	1970-01-01 01:00:00.000000000 +0100
@@ -1,32 +0,0 @@
-#!/usr/bin/perl
-
-# Test that our declared minimum Perl version matches our syntax
-
-use strict;
-BEGIN {
-	$|  = 1;
-	$^W = 1;
-}
-
-my @MODULES = (
-	'Perl::MinimumVersion 1.20',
-	'Test::MinimumVersion 0.008',
-);
-
-# Don't run tests for installs
-use Test::More;
-unless ( $ENV{AUTOMATED_TESTING} or $ENV{RELEASE_TESTING} ) {
-	plan( skip_all => "Author tests not required for installation" );
-}
-
-# Load the testing modules
-foreach my $MODULE ( @MODULES ) {
-	eval "use $MODULE";
-	if ( $@ ) {
-		$ENV{RELEASE_TESTING}
-		? die( "Failed to load required release-testing module $MODULE" )
-		: plan( skip_all => "$MODULE not available for testing" );
-	}
-}
-
-all_minimum_version_from_metayml_ok();


Index: perl-Perl-MinimumVersion.spec
===================================================================
RCS file: /cvs/pkgs/rpms/perl-Perl-MinimumVersion/devel/perl-Perl-MinimumVersion.spec,v
retrieving revision 1.14
retrieving revision 1.15
diff -u -p -r1.14 -r1.15
--- perl-Perl-MinimumVersion.spec	1 Mar 2010 13:17:26 -0000	1.14
+++ perl-Perl-MinimumVersion.spec	3 May 2010 07:45:49 -0000	1.15
@@ -1,11 +1,12 @@
 Name:           perl-Perl-MinimumVersion
 Version:        1.24
-Release:        1%{?dist}
+Release:        2%{?dist}
 Summary:        Find a minimum required version of perl for Perl code
 License:        GPL+ or Artistic
 Group:          Development/Libraries
 URL:            http://search.cpan.org/dist/Perl-MinimumVersion/
 Source0:        http://search.cpan.org/CPAN/authors/id/A/AD/ADAMK/Perl-MinimumVersion-%{version}.tar.gz
+Patch0:         Perl-MinimumVersion-25.patch
 BuildRoot:      %{_tmppath}/%{name}-%{version}-%{release}-root-%(%{__id_u} -n)
 
 Requires:       perl(:MODULE_COMPAT_%(eval "`%{__perl} -V:version`"; echo $version))
@@ -33,6 +34,7 @@ Find a minimum required version of perl 
 
 %prep
 %setup -q -n Perl-MinimumVersion-%{version}
+%patch0 -p1
 
 %build
 %{__perl} Makefile.PL INSTALLDIRS=vendor
@@ -60,6 +62,10 @@ make test AUTOMATED_TESTING=1
 %{_mandir}/man3/*
 
 %changelog
+* Mon May  3 2010 Marcela Mašláňová <mmaslano at redhat.com> - 1.24-2
+- for the meantime apply changes from trunk. Other builds using
+ this package should succed with perl-5.12.
+
 * Mon Mar 01 2010 Ralf Corsépius <corsepiu at fedoraproject.org> - 1.24-1
 - Upstream update.
 - Adjust BR's.



More information about the scm-commits mailing list