X-Git-Url: http://www.chiark.greenend.org.uk/ucgi/~mdw/git/disorder/blobdiff_plain/d22b8a59995829bc14b4490b9bddd95346e0585d..026a72d4f3e7d69c31c9523aa08554d159e21e1a:/scripts/macro-docs diff --git a/scripts/macro-docs b/scripts/macro-docs index 84f1f42..51586ea 100755 --- a/scripts/macro-docs +++ b/scripts/macro-docs @@ -6,7 +6,7 @@ my $name; my $docs; while(defined($_ = <>)) { chomp; - if(!defined $name and m,^/\* (\@([a-z\-]+).*),) { + if(!defined $name and m,^/\*! (\@?([a-z\-]+).*),) { $name = $2; my $heading = $1; $docs = [$heading];