mirror of
https://git.savannah.gnu.org/git/gperf.git
synced 2025-12-02 13:09:22 +00:00
Fix doc build error with perl 5.22.
* doc/texi2html (update_sec_num): Omit defined(...) for array.
This commit is contained in:
@@ -1561,7 +1561,7 @@ sub update_sec_num {
|
||||
$level--; # here we start at 0
|
||||
if ($name =~ /^appendix/) {
|
||||
# appendix style
|
||||
if (defined(@appendix_sec_num)) {
|
||||
if (@appendix_sec_num) {
|
||||
&incr_sec_num($level, @appendix_sec_num);
|
||||
} else {
|
||||
@appendix_sec_num = ('A', 0, 0, 0);
|
||||
@@ -1569,7 +1569,7 @@ sub update_sec_num {
|
||||
return(join('.', @appendix_sec_num[0..$level]));
|
||||
} else {
|
||||
# normal style
|
||||
if (defined(@normal_sec_num)) {
|
||||
if (@normal_sec_num) {
|
||||
&incr_sec_num($level, @normal_sec_num);
|
||||
} else {
|
||||
@normal_sec_num = (1, 0, 0, 0);
|
||||
|
||||
Reference in New Issue
Block a user