From 24f389b5caf93aaea5932e2719698797dd8c1f93 Mon Sep 17 00:00:00 2001
From: Juan RP <xtraeme@gmail.com>
Date: Wed, 4 Feb 2009 01:03:44 +0100
Subject: [PATCH] perl: replace hardcoded destdir paths.

--HG--
extra : convert_revision : 5734e2f06b62fa52a4616edd77a21231171e1f34
---
 templates/perl/template | 19 +++++++++++++++++++
 1 file changed, 19 insertions(+)

diff --git a/templates/perl/template b/templates/perl/template
index 56c910e60f..18bb5ef646 100644
--- a/templates/perl/template
+++ b/templates/perl/template
@@ -40,3 +40,22 @@ pre_build()
 		sed -i -e "s|$XBPS_MASTERDIR||g" $wrksrc/config.h
 	fi
 }
+
+post_install()
+{
+	# Remove hardcoded paths of XBPS_DESTDIR.
+	local destdir="$XBPS_DESTDIR/$pkgname-$version"
+	local FILES="Config.pm Config_heavy.pl .packlist"
+	local opmult="${xbps_machine}-linux-thread-multi"
+	local thrdir="${destdir}/usr/lib/perl5/${version}/${opmult}"
+
+	for f in ${FILES}; do
+		sed -i -e "s|$destdir||g" ${thrdir}/${f}
+	done
+	for f in $(find $destdir/usr/bin/ -type f -print); do
+		if $(echo $f|grep -q $destdir); then
+			sed -i -e "s|$destdir||g" $f
+			echo "Replacing $f"
+		fi
+	done
+}