= header levels

lib/Text/Dokuwiki.pm

@@ -57,7 +57,7 @@ sub parse {
 
     given ($line) {
       # header
-      when (m/^\s?(={1,6}) (.+) \g{1}\s*/o) {
+      when (m/^\s?(={2,6}) (.+) \g{1}\s*/o) {
         my $level = $1 =~ tr/=/=/;
         $level = 7 - $level; # invert
         push @{ $tree }, ["h$level" => {}, 0 => $2];