[packages/perl] cleanups of too much c-p

glen glen at pld-linux.org
Wed Apr 22 11:27:41 CEST 2015


commit 3aa0850991ce610bc5e24d81bf17f7e009c59d2f
Author: Elan Ruusamäe <glen at delfi.ee>
Date:   Wed Apr 22 12:27:33 2015 +0300

    cleanups of too much c-p

 perl.spec | 7 ++-----
 1 file changed, 2 insertions(+), 5 deletions(-)
---
diff --git a/perl.spec b/perl.spec
index 182ec50..0b8f004 100644
--- a/perl.spec
+++ b/perl.spec
@@ -903,7 +903,7 @@ echo '# Module versions from Perl %{ver} distribution.' > perl-modules
 for m in $(awk '!/^#/ && !/^$/{print $1}' %{SOURCE3}); do
 	case $m in
 	libnet)
-		v=$(awk '/VERSION/ {print $3; exit}' cpan/libnet/Makefile.PL | tr -d \',)
+		v=$(awk '/VERSION/ {print $3; exit}' cpan/libnet/Makefile.PL | tr -d "',")
 		;;
 	# special cased since do eval on VERSION
 	ExtUtils::CBuilder|Compress::Raw::Bzip2|Compress::Raw::Zlib)
@@ -915,15 +915,12 @@ for m in $(awk '!/^#/ && !/^$/{print $1}' %{SOURCE3}); do
 	esac
 	echo "$m = $v"
 done | LC_ALL=C sort >> perl-modules
+
 echo '# Non-straight named module versions from Perl %{ver} distribution.' > perl-modules2
 for m in $(awk '!/^#/ && !/^$/{print $1"!"$2}' %{SOURCE4}); do
 	mn="${m##*!}"
 	mp="${m%%!*}"
 	case $m in
-	# special cased since do eval on VERSION
-	ExtUtils::CBuilder|Compress::Raw::Bzip2|Compress::Raw::Zlib)
-		v=$(%{__perl} -M$mn -e "print version->parse(\$$mn::VERSION)->numify")
-		;;
 	*)
 		v=$(%{__perl} -M$mn -e "print \$$mn::VERSION")
 		;;
================================================================

---- gitweb:

http://git.pld-linux.org/gitweb.cgi/packages/perl.git/commitdiff/3aa0850991ce610bc5e24d81bf17f7e009c59d2f



More information about the pld-cvs-commit mailing list