From: short <>
Date: Thu, 10 Jul 2003 12:53:25 +0000 (+0000)
Subject: Fixed detection of missing Perl packages for RedHat perl-5.8.0-88.
X-Git-Tag: lufs_0_9_6_captive1~27
X-Git-Url: http://git.jankratochvil.net/?p=macros.git;a=commitdiff_plain;h=f6f4d5b5dfa615753c7bdd3ac3b7e15cfd2c506f

Fixed detection of missing Perl packages for RedHat perl-5.8.0-88.
 - regex '[^\s;]+' is not matched - '[^ ;]+' needed there
---

diff --git a/AutoGen.pm b/AutoGen.pm
index 45f6d7e..aa28398 100644
--- a/AutoGen.pm
+++ b/AutoGen.pm
@@ -39,7 +39,7 @@ BEGIN {
 		use File::Touch;	# &touch
 		use POSIX qw(WIFEXITED WEXITSTATUS WIFSIGNALED WTERMSIG WIFSTOPPED WSTOPSIG);
 HERE
-		eval "$_\n; 1;" or push @missing,(/^\s*use\s+([^\s;]+)/)[0];
+		eval "$_\n; 1;" or push @missing,(/^\s*use\s+([^ ;]+)/)[0];
 		}
 	die "You are missing some modules - install them by:\n"
 					."\tperl -MCPAN -e 'install qw(".join(" ",@missing).")'\n"