Improve hook matching.

git-svn-id: https://svn.apache.org/repos/asf/httpd/httpd/trunk@96984 13f79535-47bb-0310-9956-ffa450edef68

diff --git a/support/list_hooks.pl b/support/list_hooks.pl
index 6de9b41d12ec3600af9c438826b4097ef68ee51f..b2d0dd8ca5dbb24b2f20f15093e372dd9d99d1ed 100755 (executable)
--- a/support/list_hooks.pl
+++ b/support/list_hooks.pl
@@ -61,7 +61,7 @@ sub scanFile {
            $::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;