From: Christos Zoulas Date: Tue, 2 Dec 2008 16:26:17 +0000 (+0000) Subject: fix bogus perl test. X-Git-Tag: FILE5_05~265 X-Git-Url: https://granicus.if.org/sourcecode?a=commitdiff_plain;h=84926e0ca3fcc67c138053487198f710a3519e44;p=file fix bogus perl test. --- diff --git a/magic/Magdir/perl b/magic/Magdir/perl index 73fb88ba..4c22ecc9 100644 --- a/magic/Magdir/perl +++ b/magic/Magdir/perl @@ -23,7 +23,6 @@ # by Dmitry V. Levin and Alexey Tourbin # check the first line 0 search/1 package -0 regex \^package[\ \t]+[A-Za-z_] >0 regex \^package[\ \t]+[0-9A-Za-z_:]+\ *; Perl5 module source text # not 'p', check other lines 0 search/1 !p