- New upstream release 0.40 - Test::Class failed on Test::Builder 0.99 (CPAN RT#89473) - This release by RJBS -> update source URL - Drop now-redundant test patch - Use a patch to fix the documentation character encoding - Drop %defattr, redundant since rpm 4.4 - Make the %files list more explicit - No need to remove empty directories from the buildroot - Don't use macros for commands - Work around annoying noise from TAP::Parser::SourceHandler::Perl version 3.28 (CPAN RT#85106)epel9
Paul Howarth
11 years ago
parent
bfd2413913
commit
bcac0eda35
@ -1,4 +1 @@
|
|||||||
Test-Class-0.33.tar.gz
|
/Test-Class-[0-9.]*.tar.gz
|
||||||
/Test-Class-0.36.tar.gz
|
|
||||||
/Test-Class-0.38.tar.gz
|
|
||||||
/Test-Class-0.39.tar.gz
|
|
||||||
|
|||||||
@ -1,84 +0,0 @@
|
|||||||
From eceb5cde6609858e700cbeb2fd787109ce263e9c Mon Sep 17 00:00:00 2001
|
|
||||||
From: =?UTF-8?q?Petr=20P=C3=ADsa=C5=99?= <ppisar@redhat.com>
|
|
||||||
Date: Wed, 7 Aug 2013 10:58:43 +0200
|
|
||||||
Subject: [PATCH] Adjust to Test-Simple 0.98_04
|
|
||||||
MIME-Version: 1.0
|
|
||||||
Content-Type: text/plain; charset=UTF-8
|
|
||||||
Content-Transfer-Encoding: 8bit
|
|
||||||
|
|
||||||
<https://rt.cpan.org/Public/Bug/Display.html?id=85004>
|
|
||||||
|
|
||||||
Signed-off-by: Petr Písař <ppisar@redhat.com>
|
|
||||||
---
|
|
||||||
t/fail2.t | 19 ++++++++++++++-----
|
|
||||||
t/runtests_die.t | 17 +++++++++++++----
|
|
||||||
2 files changed, 27 insertions(+), 9 deletions(-)
|
|
||||||
|
|
||||||
diff --git a/t/fail2.t b/t/fail2.t
|
|
||||||
index 0231685..26d6f54 100644
|
|
||||||
--- a/t/fail2.t
|
|
||||||
+++ b/t/fail2.t
|
|
||||||
@@ -23,14 +23,23 @@ sub _test_new : Test(3) {
|
|
||||||
package main;
|
|
||||||
$ENV{TEST_VERBOSE}=0;
|
|
||||||
|
|
||||||
-my $identifier = ($Test::More::VERSION < 0.88) ? 'object' : 'thing';
|
|
||||||
+my $identifier = 'undef';
|
|
||||||
+if ($Test::More::VERSION < 0.88) {
|
|
||||||
+ $identifier = 'The object';
|
|
||||||
+} elsif ($Test::More::VERSION < 0.9804) {
|
|
||||||
+ $identifier = 'The thing';
|
|
||||||
+}
|
|
||||||
+my $quote = q{'};
|
|
||||||
+if ($Test::More::VERSION < 0.9804) {
|
|
||||||
+ $quote = q{};
|
|
||||||
+}
|
|
||||||
|
|
||||||
-test_out("not ok 1 - The $identifier isa Object");
|
|
||||||
+test_out("not ok 1 - $identifier isa $quote" . "Object" . "$quote");
|
|
||||||
test_out("not ok 2 - cannot create Objects");
|
|
||||||
-test_fail(-12);
|
|
||||||
+test_fail(-21);
|
|
||||||
test_err( "# (in Object::Test->_test_new)" );
|
|
||||||
-test_err(qr/#\s+The $identifier isn't defined\n/);
|
|
||||||
-test_fail(-15);
|
|
||||||
+test_err(qr/#\s+\Q$identifier\E isn't defined\n/);
|
|
||||||
+test_fail(-24);
|
|
||||||
test_err( "# (in Object::Test->_test_new)" );
|
|
||||||
|
|
||||||
Object::Test->runtests;
|
|
||||||
diff --git a/t/runtests_die.t b/t/runtests_die.t
|
|
||||||
index 238ec21..953bd1d 100755
|
|
||||||
--- a/t/runtests_die.t
|
|
||||||
+++ b/t/runtests_die.t
|
|
||||||
@@ -21,14 +21,23 @@ use Test::Builder::Tester tests => 1;
|
|
||||||
$ENV{TEST_VERBOSE}=0;
|
|
||||||
|
|
||||||
my $filename = sub { return (caller)[1] }->();
|
|
||||||
-my $identifier = ($Test::More::VERSION < 0.88) ? 'object' : 'thing';
|
|
||||||
+my $identifier = 'undef';
|
|
||||||
+if ($Test::More::VERSION < 0.88) {
|
|
||||||
+ $identifier = 'The object';
|
|
||||||
+} elsif ($Test::More::VERSION < 0.9804) {
|
|
||||||
+ $identifier = 'The thing';
|
|
||||||
+}
|
|
||||||
+my $quote = q{'};
|
|
||||||
+if ($Test::More::VERSION < 0.9804) {
|
|
||||||
+ $quote = q{};
|
|
||||||
+}
|
|
||||||
|
|
||||||
-test_out( "not ok 1 - The $identifier isa Object");
|
|
||||||
+test_out( "not ok 1 - $identifier isa $quote" . "Object" . "$quote");
|
|
||||||
test_err( "# Failed test ($filename at line 15)");
|
|
||||||
test_err( "# (in Foo->test_object)" );
|
|
||||||
-test_err( "# The $identifier isn't defined");
|
|
||||||
+test_err( "# $identifier isn't defined");
|
|
||||||
test_out( "not ok 2 - test_object died (could not create object)");
|
|
||||||
-test_err( "# Failed test ($filename at line 33)");
|
|
||||||
+test_err( "# Failed test ($filename at line 42)");
|
|
||||||
test_err( "# (in Foo->test_object)" );
|
|
||||||
Foo->runtests;
|
|
||||||
test_test("early die handled");
|
|
||||||
--
|
|
||||||
1.8.1.4
|
|
||||||
|
|
||||||
Loading…
Reference in new issue