diff options
Diffstat (limited to 'regress/regress.pl')
| -rwxr-xr-x | regress/regress.pl | 7 |
1 files changed, 5 insertions, 2 deletions
diff --git a/regress/regress.pl b/regress/regress.pl index 6c8e5755..cc6f3806 100755 --- a/regress/regress.pl +++ b/regress/regress.pl @@ -86,8 +86,12 @@ sub syshtml ($@) { if (!$state && s/.*<math class="eqn">//) { $state = 'math'; next unless length; - } elsif (/^BEGINTEST/) { + } elsif (/BEGINTEST/) { $state = 'other'; + next; + } elsif (/ENDTEST/) { + $state = 0; + next; } if ($state eq 'math') { s/^ *//; @@ -98,7 +102,6 @@ sub syshtml ($@) { } } print $outfd "$_\n" if $state; - $state = 0 if /^ENDTEST/; } close $outfd; close $infd; |