Sorry, one of the patches had a mistake.
--
Martín Ferrari
diff -Naur libtest-class-perl-0.11-new/debian/control libtest-class-perl-0.11-newdebian/debian/control
--- libtest-class-perl-0.11-new/debian/control 2006-04-15 01:30:27.000000000 -0300
+++ libtest-class-perl-0.11-newdebian/debian/control 2006-04-16 06:57:13.819123404 -0300
@@ -2,12 +2,12 @@
Section: perl
Priority: optional
Maintainer: Jay Bonci <[EMAIL PROTECTED]>
-Build-Depends-Indep: debhelper (>> 4.0), perl (>= 5.6.0-16), libtest-builder-tester-perl, libtest-differences-perl, libtest-exception-perl, libio-string-perl, libmodule-build-perl, libdevel-symdump-perl
+Build-Depends-Indep: debhelper (>> 4.0), perl (>= 5.6.0-16), perl-modules (>= 5.8.8), libtest-differences-perl, libtest-exception-perl, libio-string-perl, libmodule-build-perl, libdevel-symdump-perl, dpatch
Standards-Version: 3.6.2.1
Package: libtest-class-perl
Architecture: all
-Depends: ${perl:Depends}, libtest-builder-tester-perl, libtest-differences-perl, libtest-exception-perl, libio-string-perl, libdevel-symdump-perl
+Depends: ${perl:Depends}, perl-modules (>= 5.8.8), libtest-differences-perl, libtest-exception-perl, libio-string-perl, libdevel-symdump-perl
Suggests: libdate-ical-perl
Description: easily create perl test classes in an xUnit style
Test::Class from CPAN provides a simple way of creating classes
diff -Naur libtest-class-perl-0.11-new/debian/patches/00list libtest-class-perl-0.11-newdebian/debian/patches/00list
--- libtest-class-perl-0.11-new/debian/patches/00list 1969-12-31 21:00:00.000000000 -0300
+++ libtest-class-perl-0.11-newdebian/debian/patches/00list 2006-04-16 06:47:52.926220393 -0300
@@ -0,0 +1 @@
+testcases_hardcoding
diff -Naur libtest-class-perl-0.11-new/debian/patches/testcases_hardcoding.dpatch libtest-class-perl-0.11-newdebian/debian/patches/testcases_hardcoding.dpatch
--- libtest-class-perl-0.11-new/debian/patches/testcases_hardcoding.dpatch 1969-12-31 21:00:00.000000000 -0300
+++ libtest-class-perl-0.11-newdebian/debian/patches/testcases_hardcoding.dpatch 2006-04-16 06:49:46.840111343 -0300
@@ -0,0 +1,128 @@
+#! /bin/sh /usr/share/dpatch/dpatch-run
+## testcases_hardcoding.patch.dpatch by Martin Ferrari <[EMAIL PROTECTED]>
+##
+## All lines beginning with `## DP:' are a description of the patch.
+## DP: Fix for the two testcases which failed because of a hardcoded
+## DP: stdout/stderr checking
+
[EMAIL PROTECTED]@
+diff -Naur libtest-class-perl-0.11/t/die_before_plan.t libtest-class-perl-0.11-new/t/die_before_plan.t
+--- libtest-class-perl-0.11/t/die_before_plan.t 2005-02-19 16:32:33.000000000 -0300
++++ libtest-class-perl-0.11-new/t/die_before_plan.t 2006-04-16 05:13:58.474443044 -0300
+@@ -3,10 +3,7 @@
+ use strict;
+ use warnings;
+ use Test;
+-use Fcntl;
+-use IO::File;
+-use Test::Builder;
+-use POSIX qw(_exit);
++use Test::Builder::Tester tests => 1;
+
+ package Object::Test;
+ use base 'Test::Class';
+@@ -23,29 +20,11 @@
+
+ package main;
+
+-my $io = IO::File->new_tmpfile or die "couldn't create tmp file ($!)\n";
+-my $Test = Test::Builder->new;
+-$Test->output($io);
+-$Test->failure_output($io);
+-$ENV{TEST_VERBOSE}=0;
+-$ENV{HARNESS_ACTIVE}=0;
+-Object::Test->runtests;
+-
+-plan tests => 4;
+-
+-seek $io, SEEK_SET, 0;
+-my $SEP = $^O eq "MSWin32" ? '\\' : '/';
+-while (my $actual = <$io>) {
+- chomp($actual);
+- my $expected=<DATA>; chomp($expected);
+- $expected =~ s!/!$SEP!gs;
+- ok($actual, $expected);
+-};
+-
+-_exit(0);
++#$ENV{TEST_VERBOSE}=0;
++#$ENV{HARNESS_ACTIVE}=0;
+
+-__DATA__
+-1..1
+-not ok 1 - setup (for test method 'test') died (died before plan set)
+-# Failed test (t/die_before_plan.t at line 32)
+-ok 2 - test just here to get setup method run
++test_out("not ok 1 - setup (for test method 'test') died (died before plan set)");
++test_fail(+2);
++test_out("ok 2 - test just here to get setup method run");
++Object::Test->runtests;
++test_test("die before plan");
+diff -Naur libtest-class-perl-0.11/t/fail2.t libtest-class-perl-0.11-new/t/fail2.t
+--- libtest-class-perl-0.11/t/fail2.t 2005-02-19 16:32:33.000000000 -0300
++++ libtest-class-perl-0.11-new/t/fail2.t 2006-04-16 05:46:28.119145305 -0300
+@@ -2,12 +2,8 @@
+
+ use strict;
+ use warnings;
+-use Test;
+-use Test::Builder;
+-use Fcntl;
+-use IO::File;
+-use POSIX qw(_exit);
+-
++use Test::More tests => 2;
++use Test::Builder::Tester;
+
+ package Object;
+ sub new {return(undef)};
+@@ -25,38 +21,18 @@
+
+
+ package main;
++#$ENV{TEST_VERBOSE}=0;
++#$ENV{HARNESS_ACTIVE}=0;
+
+-plan tests => 9;
+-
+-my $io = IO::File->new_tmpfile or die "couldn't create tmp file ($!)\n";
+-my $Test = Test::Builder->new;
+-$Test->output($io);
+-$Test->failure_output($io);
++test_out("not ok 1 - The object isa Object");
++test_out("not ok 2 - cannot create Objects");
++test_fail(-11);
++test_err(qr/#\s+The object isn't defined\n/);
++test_fail(-13);
+
+-$ENV{TEST_VERBOSE}=0;
+-$ENV{HARNESS_ACTIVE}=0;
+ Object::Test->runtests;
+ END {
+- $|=1;
+- seek $io, SEEK_SET, 0;
+- my $SEP = $^O eq "MSWin32" ? '\\' : '/';
+- while (my $actual = <$io>) {
+- chomp($actual);
+- my $expected=<DATA>; chomp($expected);
+- $expected =~ s!/!$SEP!gs;
+- ok($actual, $expected);
+- };
+-
+- ok($?, 3);
+- _exit(0); # need to stop Test::Builder's $? tweak
+-};
+-
+-__DATA__
+-1..3
+-not ok 1 - The object isa Object
+-# Failed test (t/fail2.t at line 22)
+-# The object isn't defined
+-not ok 2 - cannot create Objects
+-# Failed test (t/fail2.t at line 22)
+-not ok 3 - cannot create Objects
+-# Failed test (t/fail2.t at line 22)
++ test_test("fail2");
++ is($?, 2, "exit value okay");
++ $?=0;
++}
diff -Naur libtest-class-perl-0.11-new/debian/rules libtest-class-perl-0.11-newdebian/debian/rules
--- libtest-class-perl-0.11-new/debian/rules 2006-04-15 01:30:27.000000000 -0300
+++ libtest-class-perl-0.11-newdebian/debian/rules 2006-04-16 06:59:43.401026949 -0300
@@ -7,15 +7,17 @@
# This is the debhelper compatibility version to use.
#export DH_COMPAT=4
+include /usr/share/dpatch/dpatch.make
PACKAGE=`pwd | sed -e "s/.*\/\\(.*\\)-.*/\\1/"`
SHAREDIR=$(CURDIR)/debian/$(PACKAGE)/usr/share/$(PACKAGE)
-build:
+build: patch
dh_testdir
# Add here commands to compile the package.
perl Build.PL installdirs=vendor
-clean:
+clean: clean-patched unpatch
+clean-patched:
dh_testdir
dh_testroot