From ef474573af190ae2eb9902947e64fc27991dca25 Mon Sep 17 00:00:00 2001
From: Anton Berezin <tobez@FreeBSD.org>
Date: Mon, 27 Feb 2006 15:13:06 +0000
Subject: Make it work with perl 5.8.8. No portrevision bump.
Approved by: portmgr (kris/semi-implicit)
---
textproc/p5-xmltv/files/patch-Makefile.PL | 19 +++++++++++++++----
1 file changed, 15 insertions(+), 4 deletions(-)
(limited to 'textproc')
diff --git a/textproc/p5-xmltv/files/patch-Makefile.PL b/textproc/p5-xmltv/files/patch-Makefile.PL
index 0f1018a64882..b18e12d81352 100644
--- a/textproc/p5-xmltv/files/patch-Makefile.PL
+++ b/textproc/p5-xmltv/files/patch-Makefile.PL
@@ -1,6 +1,6 @@
---- Makefile.PL.orig Mon Oct 25 02:33:47 2004
-+++ Makefile.PL Fri Nov 26 15:29:30 2004
-@@ -466,14 +466,14 @@
+--- Makefile.PL.orig Mon Feb 27 15:53:11 2006
++++ Makefile.PL Mon Feb 27 15:56:50 2006
+@@ -537,14 +537,14 @@ END
# Guess a default value for {install} based on whether
# prerequisites were found.
#
@@ -17,7 +17,7 @@
# Need to set {install} for each component by prompting.
foreach my $info (@opt_components) {
my $missing = $info->{missing};
-@@ -502,8 +502,8 @@
+@@ -573,8 +573,8 @@ END
die;
}
@@ -28,3 +28,14 @@
}
}
}
+@@ -778,8 +778,8 @@ END
+ }
+
+ # Remove existing non-working 'uninstall' target.
+- $inherited =~ s!^uninstall\s:.*$!!m
+- or die "no uninstall target in: $inherited";
++ $inherited =~ s!^uninstall\s::?.*?\n\t+.*$!!m;
++ $inherited =~ s!^uninstall\s:.*$!!m;
+
+ # For each *_install create a corresponding _uninstall.
+ my $targets = ::targets($inherited);
--
cgit v1.2.3