Commit 73488ca4 authored by anonym's avatar anonym
Browse files

Fix regex.

So /[D|d]/ will match "|" which wasn't the intention. Presumably the
intention was /(D|d)/, but a plain /[Dd]/ is cleaner.
parent cb295055
......@@ -146,7 +146,7 @@ sub newestDateHeader {
chomp $line;
# empty line == we leave the headers to go into the content
last if $line eq '';
last if ($date) = ($line =~ m/^\s*[D|d]ate:\s+(.*)$/m);
last if ($date) = ($line =~ m/^\s*[Dd]ate:\s+(.*)$/m);
}
close $file_h;
if (defined $date) {
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment