From c9cb5723e1cce2d12151182d2e848965550c9dfc Mon Sep 17 00:00:00 2001
From: =?utf8?q?Elan=20Ruusam=C3=A4e?= <glen@pld-linux.org>
Date: Fri, 15 Apr 2005 15:56:35 +0000
Subject: [PATCH] - making perl packaging fun

Changed files:
    adapter.awk -> 1.152
---
 adapter.awk | 21 ++++++++++++++++++++-
 1 file changed, 20 insertions(+), 1 deletion(-)

diff --git a/adapter.awk b/adapter.awk
index 6d69ee5..8c70e56 100644
--- a/adapter.awk
+++ b/adapter.awk
@@ -49,6 +49,15 @@ BEGIN {
 	"rpm --eval %_includedir" | getline includedir
 	"rpm --eval %_mandir"	| getline mandir
 	"rpm --eval %_infodir"	| getline infodir
+
+	"rpm --eval %perl_sitearch" | getline perl_sitearch
+	"rpm --eval %perl_archlib" | getline perl_archlib
+	"rpm --eval %perl_privlib" | getline perl_privlib
+	"rpm --eval %perl_archlib" | getline perl_archlib
+	"rpm --eval %perl_vendorlib" | getline perl_vendorlib
+	"rpm --eval %perl_vendorarch" | getline perl_vendorarch
+	"rpm --eval %perl_sitelib" | getline perl_sitelib
+	"rpm --eval %perl_sitearch" | getline perl_sitearch
 }
 
 # There should be a comment with CVS keywords on the first line of file.
@@ -573,6 +582,15 @@ function format_preamble()
 # Replace directly specified directories with macros
 function use_macros()
 {
+	gsub(perl_sitearch, "%{perl_sitearch}")
+	gsub(perl_archlib, "%{perl_archlib}")
+	gsub(perl_privlib, "%{perl_privlib}")
+	gsub(perl_archlib, "%{perl_archlib}")
+	gsub(perl_vendorlib, "%{perl_vendorlib}")
+	gsub(perl_vendorarch, "%{perl_vendorarch}")
+	gsub(perl_sitelib, "%{perl_sitelib}")
+	gsub(perl_sitearch, "%{perl_sitearch}")
+
 	gsub(bindir, "%{_bindir}")
 	gsub("%{prefix}/bin", "%{_bindir}")
 	if(prefix"/bin" == bindir)
@@ -618,13 +636,14 @@ function use_macros()
 		gsub(datadir, "%{_datadir}", $c)
 	}
 
+
 	gsub("%{prefix}/share", "%{_datadir}")
 	if (prefix"/share" == datadir)
 		gsub("%{_prefix}/share", "%{_datadir}")
 
 	gsub(includedir, "%{_includedir}")
 	gsub("%{prefix}/include", "%{_includedir}")
-	if(prefix"/include" == includedir)
+	if (prefix"/include" == includedir)
 		gsub("%{_prefix}/include", "%{_includedir}")
 
 	gsub(mandir, "%{_mandir}")
-- 
2.44.0