X-Git-Url: http://www.chiark.greenend.org.uk/ucgi/~mdw/git/disorder/blobdiff_plain/f4a26919bcd8352f35159793b57196d516435e26..5c1ae3bc9c3a3cbed192fed2d68fc9b7bbe5c96f:/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];