]>
Commit | Line | Data |
---|---|---|
ebfdd94c JB |
1 | --- octave-4.4.1/doc/interpreter/mk-qthelp.pl.orig 2018-08-09 20:20:32.000000000 +0200 |
2 | +++ octave-4.4.1/doc/interpreter/mk-qthelp.pl 2022-12-25 16:48:08.895830547 +0100 | |
3 | @@ -27,7 +27,7 @@ open (my $HTML, "<", $htmlfname) or die | |
4 | ||
5 | # Skip through preamble of file to find start of list | |
6 | while (($_ = <$HTML>) !~ /^<div class="contents">/ ) {;} | |
7 | -while (($_ = <$HTML>) !~ /^<ul class="no-bullet">/ ) {;} | |
8 | +while (($_ = <$HTML>) !~ /^<ul class="(no-bullet|toc-numbered-mark)">/ ) {;} | |
9 | ||
10 | $level = 0; | |
11 | while (<$HTML>) | |
12 | @@ -68,7 +68,7 @@ $htmlfname = File::Spec->catfile ($based | |
13 | open ($HTML, "<", $htmlfname) or die "Unable to open $htmlfname"; | |
14 | ||
15 | # Skip through preamble of file to find start of list | |
16 | -while (($_ = <$HTML>) !~ /^<table class="index-fn/ ) {;} | |
17 | +while (($_ = <$HTML>) !~ /^<table class="(index-fn|fn-entries-printindex)/ ) {;} | |
18 | ||
19 | while (<$HTML>) | |
20 | { |