[5386] * tp/Texinfo/Structuring.pm: if SHOW_MENU is set, do not error out on

[Patrice Dumas]

Revision: 5386
          http://svn.sv.gnu.org/viewvc/?view=rev&root=texinfo&revision=5386
Author:   pertusus
Date:     2013-10-19 12:55:29 +0000 (Sat, 19 Oct 2013)
Log Message:
-----------
        * tp/Texinfo/Structuring.pm: if SHOW_MENU is set, do not error out on
        lacking entry in menu.

Modified Paths:
--------------
    trunk/ChangeLog
    trunk/tp/Texinfo/Structuring.pm

Modified: trunk/ChangeLog
===================================================================
--- trunk/ChangeLog     2013-10-10 21:55:37 UTC (rev 5385)
+++ trunk/ChangeLog     2013-10-19 12:55:29 UTC (rev 5386)
@@ -1,3 +1,8 @@
+2013-10-19  Patrice Dumas  <address@hidden>
+
+       * tp/Texinfo/Structuring.pm: if SHOW_MENU is set, do not error out on
+       lacking entry in menu.
+
 2013-10-10  Karl Berry  <address@hidden>
 
        * doc/texinfo.texi (Short Sample Texinfo File): do not use

Modified: trunk/tp/Texinfo/Structuring.pm
===================================================================
--- trunk/tp/Texinfo/Structuring.pm     2013-10-10 21:55:37 UTC (rev 5385)
+++ trunk/tp/Texinfo/Structuring.pm     2013-10-19 12:55:29 UTC (rev 5386)
@@ -828,7 +828,8 @@
     # and therefore $node->{'node_up'}->{'extra'}->{'manual_content'}.
     # The node_up should always be different from the menu_up, therefore
     # if in a menu, the second condition/error message applies.
-    if ($node->{'node_up'} and 
($node->{'node_up'}->{'extra'}->{'manual_content'}
+    if ($self->{'SHOW_MENU'} and $node->{'node_up'} 
+        and ($node->{'node_up'}->{'extra'}->{'manual_content'}
          or !$node->{'menu_up_hash'}
          or 
!$node->{'menu_up_hash'}->{$node->{'node_up'}->{'extra'}->{'normalized'}})) {
       if (!$node->{'node_up'}->{'extra'}->{'manual_content'}) {