diff --git a/misc-scripts/doxygen_filter/EnsEMBL/PerlFilter.pm b/misc-scripts/doxygen_filter/EnsEMBL/PerlFilter.pm index fdcea3038ad3fe4c1bb2e5926b1d6b7b65b8a52c..9916536df91176237b15956b61fb780d842436e4 100644 --- a/misc-scripts/doxygen_filter/EnsEMBL/PerlFilter.pm +++ b/misc-scripts/doxygen_filter/EnsEMBL/PerlFilter.pm @@ -445,7 +445,7 @@ sub code_action { push @big_buffer,$line; # When we run out of open brackets, or we hit weird unpaired brackets in strings or comments - if ($brackets <=0 || $line =~ /^=/ || $line =~ /^\s*sub/ || $line =~ /^\s*1;/) { + if ($brackets <=0 || $line =~ /^=/ || $line =~ /^\s*sub[\s{]/ || $line =~ /^\s*1;/) { $state = NORMAL; push @big_buffer,"\@endcode\n </div>*/\n"; #Add fake function for doxygen to find after the comment.