diff options
author | elliott_c <ocielliottc@users.noreply.github.com> | 2010-02-23 15:10:52 +0000 |
---|---|---|
committer | elliott_c <ocielliottc@users.noreply.github.com> | 2010-02-23 15:10:52 +0000 |
commit | 61e7a1bff682ef695d0fe2204b9b2e0918b47fb5 (patch) | |
tree | 218b6d5404db3012b8c1495530968fceed46344b /devtools | |
parent | aed50e52fb29715552f90ed778d4c261643bc8e6 (diff) | |
download | MPC-61e7a1bff682ef695d0fe2204b9b2e0918b47fb5.tar.gz |
ChangeLogTag: Tue Feb 23 15:08:32 UTC 2010 Chad Elliott <elliott_c@ociweb.com>
Diffstat (limited to 'devtools')
-rwxr-xr-x | devtools/document_template.pl | 26 |
1 files changed, 18 insertions, 8 deletions
diff --git a/devtools/document_template.pl b/devtools/document_template.pl index f1c51f65..6536c539 100755 --- a/devtools/document_template.pl +++ b/devtools/document_template.pl @@ -288,10 +288,15 @@ if (open($fh, $input)) { } } else { - foreach my $ao (keys %arrow_op) { - if ($k =~ /^$ao/) { - $tvar = 1; - last; + if ($k =~ /^\w+\->/) { + $tvar = 1; + } + else { + foreach my $ao (keys %arrow_op) { + if ($k =~ /^$ao/) { + $tvar = 1; + last; + } } } } @@ -311,10 +316,15 @@ if (open($fh, $input)) { if (defined $keywords{$n}) { } else { - foreach my $ao (keys %arrow_op) { - if ($n =~ /^$ao/) { - $tvar = 1; - last; + if ($n =~ /^\w+\->/) { + $tvar = 1; + } + else { + foreach my $ao (keys %arrow_op) { + if ($n =~ /^$ao/) { + $tvar = 1; + last; + } } } if (!$tvar) { |