Adwaith-Rajesh/gperf
1
0
Fork 0
mirror of https://git.savannah.gnu.org/git/gperf.git synced 2025-12-02 13:09:22 +00:00
Code Activity

Fix doc build error with perl 5.22.

Browse Source 
* doc/texi2html (update_sec_num): Omit defined(...) for array.
This commit is contained in:
Bruno Haible
2017-04-01 00:18:30 +02:00
parent 825b077bf4
commit 09cfae667e
2 changed files with 7 additions and 2 deletions
Download Patch File Download Diff File Expand all files Collapse all files

5
ChangeLog
View File

@@ -1,3 +1,8 @@
2017-03-31 Bruno Haible <bruno@clisp.org>
Fix doc build error with perl 5.22.
* doc/texi2html (update_sec_num): Omit defined(...) for array.
2017-01-10 Bruno Haible <bruno@clisp.org> 2017-01-10 Bruno Haible <bruno@clisp.org>
Update some URL. Update some URL.

4
doc/texi2html
View File

@@ -1561,7 +1561,7 @@ sub update_sec_num {
$level--; # here we start at 0 $level--; # here we start at 0
if ($name =~ /^appendix/) { if ($name =~ /^appendix/) {
# appendix style # appendix style
if (defined(@appendix_sec_num)) { if (@appendix_sec_num) {
&incr_sec_num($level, @appendix_sec_num); &incr_sec_num($level, @appendix_sec_num);
} else { } else {
@appendix_sec_num = ('A', 0, 0, 0); @appendix_sec_num = ('A', 0, 0, 0);
@@ -1569,7 +1569,7 @@ sub update_sec_num {
return(join('.', @appendix_sec_num[0..$level])); return(join('.', @appendix_sec_num[0..$level]));
} else { } else {
# normal style # normal style
if (defined(@normal_sec_num)) { if (@normal_sec_num) {
&incr_sec_num($level, @normal_sec_num); &incr_sec_num($level, @normal_sec_num);
} else { } else {
@normal_sec_num = (1, 0, 0, 0); @normal_sec_num = (1, 0, 0, 0);