summaryrefslogtreecommitdiffstats
path: root/perl_checker_fake_packages/gen.pl
diff options
context:
space:
mode:
authorGuillaume Cottenceau <gc@mandriva.com>2003-04-29 21:13:57 +0000
committerGuillaume Cottenceau <gc@mandriva.com>2003-04-29 21:13:57 +0000
commitf46e241cf4263ac3e75cd7fdc3b622b4aab7428f (patch)
tree32d3d327736b292f3949192f7ceb36085230ff46 /perl_checker_fake_packages/gen.pl
parent28915bd9ba5d2f1059e398ab2b809d5f850acd7d (diff)
downloadperl_checker-f46e241cf4263ac3e75cd7fdc3b622b4aab7428f.tar
perl_checker-f46e241cf4263ac3e75cd7fdc3b622b4aab7428f.tar.gz
perl_checker-f46e241cf4263ac3e75cd7fdc3b622b4aab7428f.tar.bz2
perl_checker-f46e241cf4263ac3e75cd7fdc3b622b4aab7428f.tar.xz
perl_checker-f46e241cf4263ac3e75cd7fdc3b622b4aab7428f.zip
fix methods with numeric constants
Diffstat (limited to 'perl_checker_fake_packages/gen.pl')
-rwxr-xr-xperl_checker_fake_packages/gen.pl2
1 files changed, 1 insertions, 1 deletions
diff --git a/perl_checker_fake_packages/gen.pl b/perl_checker_fake_packages/gen.pl
index fc67919..ce06ab1 100755
--- a/perl_checker_fake_packages/gen.pl
+++ b/perl_checker_fake_packages/gen.pl
@@ -36,7 +36,7 @@ sub gtk2 {
#- sub EXPOSURE_MASK { 'exposure-mask' }
/$subroutine_decl('[^']+')|("[^"]+")\s*}/ and $add->($fun, '() {}');
#- sub Sym_Hangul_J_Phieuf { 0xeed }
- /$subroutine_decl\0\S+\s*}/ and $add->($fun, '() {}');
+ /$subroutine_decl\d\S+\s*}/ and $add->($fun, '() {}');
#- traditional form
#- my ($class, $interval, $func, $data) = @_;