Header line regex was not quite right.
Note that the header line can look like this: -- ------ --- … and this regex should match it.
This commit is contained in:
parent
bd38cf6198
commit
ee82738f0a
1 changed files with 1 additions and 1 deletions
|
@ -237,7 +237,7 @@ while (1) {
|
|||
unless ($seenSeperator) {
|
||||
if ($line =~ /^\s*$/) {
|
||||
$seenSeperator = 1;
|
||||
} elsif ($currentFormat eq 'text' and $line =~ /^\s*\-+\s*$/) {
|
||||
} elsif ($currentFormat eq 'text' and $line =~ /^\s*[\-\s]+\s*$/) {
|
||||
$seenSeperator = 1;
|
||||
}
|
||||
$prevLine = $line;
|
||||
|
|
Loading…
Reference in a new issue