[libtest-inline-perl] 05/08: d/patches removed, because upstream removed it, broken debian diff, from old version
Jonas Genannt
jonas at brachium-system.net
Fri Aug 16 15:49:44 UTC 2013
This is an automated email from the git hooks/post-receive script.
hggh-guest pushed a commit to branch master
in repository libtest-inline-perl.
commit dd35720180556fe9e9dabd6c3df3c146b6941213
Author: Jonas Genannt <jonas at brachium-system.net>
Date: Fri Aug 16 17:23:36 2013 +0200
d/patches removed, because upstream removed it, broken debian diff, from old version
---
debian/patches/series | 1 -
debian/patches/test_pod_pmv.patch | 101 -------------------------------------
2 files changed, 102 deletions(-)
diff --git a/debian/patches/series b/debian/patches/series
deleted file mode 100644
index 844ffc7..0000000
--- a/debian/patches/series
+++ /dev/null
@@ -1 +0,0 @@
-test_pod_pmv.patch
diff --git a/debian/patches/test_pod_pmv.patch b/debian/patches/test_pod_pmv.patch
deleted file mode 100644
index d0452dc..0000000
--- a/debian/patches/test_pod_pmv.patch
+++ /dev/null
@@ -1,101 +0,0 @@
-diff --git a/t/98_pod.t b/t/98_pod.t
-new file mode 100644
-index 0000000..8e61c1e
---- /dev/null
-+++ b/t/98_pod.t
-@@ -0,0 +1,67 @@
-+#!/usr/bin/perl
-+
-+use strict;
-+BEGIN {
-+ $| = 1;
-+ $^W = 1;
-+}
-+use Test::More;
-+
-+# Skip if doing a regular install
-+unless ( $ENV{AUTOMATED_TESTING} ) {
-+ plan( skip_all => "Author tests not required for installation" );
-+}
-+
-+# Load the testing modules if we can
-+eval "use Test::Pod 1.00";
-+if ( $@ ) {
-+ plan( skip_all => "Test::Pod not available for testing" );
-+}
-+
-+all_pod_files_ok();
-+exit(0);
-+
-+
-+
-+
-+
-+#####################################################################
-+# WARNING: INSANE BLACK MAGIC
-+#####################################################################
-+
-+# Hack Pod::Simple::BlackBox to ignore the Test::Inline
-+# "Extended Begin" syntax.
-+# For example, "=begin has more than one word errors"
-+my $begin;
-+if ( $Test::Pod::VERSION ) {
-+ $begin = \&Pod::Simple::BlackBox::_ponder_begin;
-+}
-+sub mybegin {
-+ my $para = $_[1];
-+ my $content = join ' ', splice @$para, 2;
-+ $content =~ s/^\s+//s;
-+ $content =~ s/\s+$//s;
-+ my @words = split /\s+/, $content;
-+ if ( $words[0] =~ /^test(?:ing)?\z/s ) {
-+ foreach ( 2 .. $#$para ) {
-+ $para->[$_] = '';
-+ }
-+ $para->[2] = $words[0];
-+ }
-+
-+ # Continue as normal
-+ push @$para, @words;
-+ return &$begin(@_);
-+}
-+
-+SCOPE: {
-+ local $^W = 0;
-+ if ( $Test::Pod::VERSION ) {
-+ *Pod::Simple::BlackBox::_ponder_begin = \&mybegin;
-+ }
-+}
-+
-+#####################################################################
-+# END BLACK MAGIC
-+#####################################################################
-+
-diff --git a/t/99_pmv.t b/t/99_pmv.t
-new file mode 100644
-index 0000000..55384b2
---- /dev/null
-+++ b/t/99_pmv.t
-@@ -0,0 +1,22 @@
-+#!/usr/bin/perl
-+
-+use strict;
-+BEGIN {
-+ $| = 1;
-+ $^W = 1;
-+}
-+use Test::More;
-+
-+# Skip if doing a regular install
-+unless ( $ENV{AUTOMATED_TESTING} ) {
-+ plan( skip_all => "Author tests not required for installation" );
-+}
-+
-+# Can we run the version tests
-+eval "use Test::MinimumVersion 0.007;";
-+if ( $@ ) {
-+ plan( skip_all => "Test::MinimumVersion not available" );
-+}
-+
-+# Test minimum version
-+all_minimum_version_from_metayml_ok();
--
Alioth's /usr/local/bin/git-commit-notice on /srv/git.debian.org/git/pkg-perl/packages/libtest-inline-perl.git
More information about the Pkg-perl-cvs-commits
mailing list