You are viewing a plain text version of this content. The canonical link for it is here.
Posted to cvs@httpd.apache.org by be...@apache.org on 2002/09/26 13:58:25 UTC
cvs commit: httpd-2.0/support list_hooks.pl
ben 2002/09/26 04:58:25
Modified: support list_hooks.pl
Log:
Improve hook matching.
Revision Changes Path
1.3 +1 -1 httpd-2.0/support/list_hooks.pl
Index: list_hooks.pl
===================================================================
RCS file: /home/cvs/httpd-2.0/support/list_hooks.pl,v
retrieving revision 1.2
retrieving revision 1.3
diff -u -r1.2 -r1.3
--- list_hooks.pl 6 May 2002 12:04:56 -0000 1.2
+++ list_hooks.pl 26 Sep 2002 11:58:25 -0000 1.3
@@ -61,7 +61,7 @@
$::Hooks{$name}->{declared}=$file;
$::Hooks{$name}->{ret}=$ret;
$::Hooks{$name}->{args}=$args;
- } elsif(/AP_DECLARE_HOOK\(([^,]+),([^,]+)/) {
+ } elsif(/AP_DECLARE_HOOK\((\s*[^,\s]+)\s*,\s*([^,\s]+)/) {
# really we should swallow subsequent lines to get the arguments...
my $name=$2;
my $ret=$1;