[Docutils-checkins] r5070 - trunk/prest/Makefile.PL

[<mn...@us...>]

Author: mnodine
Date: 2007-05-07 19:47:17 +0200 (Mon, 07 May 2007)
New Revision: 5070

Modified:
   trunk/prest/Makefile.PL
Log:
Fixed a problem with a Linuxism in the find command.


Modified: trunk/prest/Makefile.PL
===================================================================
--- trunk/prest/Makefile.PL	2007-05-07 14:39:59 UTC (rev 5069)
+++ trunk/prest/Makefile.PL	2007-05-07 17:47:17 UTC (rev 5070)
@@ -19,7 +19,7 @@
 open PM, "lib/Text/Restructured.pm";
 while (<PM>) {
     if (/\$VERSION\s*=/) {
-	my $VERSION;
+	my $VERSION;		# N.B.: Needed so $VERSION passes strict
 	$Version = eval $_;
     }
 }
@@ -149,8 +149,7 @@
 #### Finally, create the Makefile
 # Get list of perl modules in lib subdirectory
 chomp (my @pm_files =
-       grep ! /\.svn|\bCVS\b/, 
-       `find lib -type f -and -not -name '*~' -and -not -name '*.PL'`);
+       grep ! /\.svn|\bCVS\b|~\Z|\.PL\Z/, `find lib -type f`);
 my %pm_files;
 @pm_files{@pm_files} = map "blib/$_", @pm_files;