X-Git-Url: https://git.jankratochvil.net/?p=macros.git;a=blobdiff_plain;f=AutoGen.pm;h=aa28398a2f200b321253a88f3e552c152a2221a7;hp=45f6d7e34fb4a7b3fe297105509863e0b845e177;hb=f6f4d5b5dfa615753c7bdd3ac3b7e15cfd2c506f;hpb=b2f7664779840eca0c314a4cd035e6af7c500bf9

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"