32 lines
884 B
Diff
32 lines
884 B
Diff
From: coolo@suse.com
|
|
|
|
perl 5.22 makes the long deprecated defined(@array) an hard
|
|
error
|
|
---
|
|
support/texi2html | 6 +++---
|
|
1 file changed, 3 insertions(+), 3 deletions(-)
|
|
|
|
--- support/texi2html
|
|
+++ support/texi2html 2016-03-08 11:49:40.596622296 +0000
|
|
@@ -4855,9 +4855,9 @@ sub update_sec_num {
|
|
my $ret;
|
|
|
|
$level--; # here we start at 0
|
|
- if ($name =~ /^appendix/ || defined(@appendix_sec_num)) {
|
|
+ if ($name =~ /^appendix/ || @appendix_sec_num) {
|
|
# 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);
|
|
@@ -4865,7 +4865,7 @@ sub update_sec_num {
|
|
$ret = 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);
|
|
}
|