| … | … | ||
|---|---|---|---|
| 10 | 10 | ||
| 11 | my @topics; | 11 | my @topics; |
| 12 | my $level = 1e9; | 12 | my $level = 1e9; |
| 13 | 13 | ||
| 14 | for my $par (@$paragraphs) { | 14 | for my $par (@$paragraphs) { |
| 15 | Coro::cede; | 15 | cf::cede_to_tick; |
| 16 | if ($par->{type} eq "head2") { | 16 | if ($par->{type} eq "head2") { |
| 17 | if ($par->{markup} =~ /^(\S+)/) { | 17 | if ($par->{markup} =~ /^(\S+)/) { |
| 18 | push @topics, $1 => [$type => $par]; | 18 | push @topics, $1 => [$type => $par]; |
| 19 | $level = $par->{level}; | 19 | $level = $par->{level}; |
| 20 | } | 20 | } |
| – | Removed lines |
| + | Added lines |
| < | Changed lines |
| > | Changed lines |