===================================================================
RCS file: /home/cvs/OpenXM_contrib2/windows/help/texi2html,v
retrieving revision 1.2
retrieving revision 1.3
diff -u -p -r1.2 -r1.3
--- OpenXM_contrib2/windows/help/texi2html	2013/09/02 20:15:23	1.2
+++ OpenXM_contrib2/windows/help/texi2html	2016/06/29 15:26:24	1.3
@@ -11,7 +11,7 @@ eval '(exit $?0)' && eval 'exec perl -S $0 ${1+"$@"}' 
 #-##############################################################################
 
 # From @(#)texi2html	1.52 01/05/98	Written (mainly) by Lionel Cons, Lionel.Cons@cern.ch
-# $Id: texi2html,v 1.2 2013/09/02 20:15:23 ohara Exp $
+# $Id: texi2html,v 1.3 2016/06/29 15:26:24 ohara Exp $
 # This version of texi2html is currently maintained at
 # ftp://ftp.cs.umb.edu/pub/tex/texi2html by kb@cs.umb.edu.
 
@@ -1559,7 +1559,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);
@@ -1567,7 +1567,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);
 	} else {
 	    @normal_sec_num = (1, 0, 0, 0);