[7479] nodes_tree brevity

[gavinsmith0123]

Revision: 7479
          http://svn.sv.gnu.org/viewvc/?view=rev&root=texinfo&revision=7479
Author:   gavin
Date:     2016-10-30 10:53:00 +0000 (Sun, 30 Oct 2016)
Log Message:
-----------
nodes_tree brevity

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

Modified: trunk/ChangeLog
===================================================================
--- trunk/ChangeLog     2016-10-30 09:45:28 UTC (rev 7478)
+++ trunk/ChangeLog     2016-10-30 10:53:00 UTC (rev 7479)
@@ -1,5 +1,10 @@
 2016-10-30  Gavin Smith  <address@hidden>
 
+       * tp/Texinfo/Structuring.pm (nodes_tree): Use a hash reference
+       that is inside a variable for brevity.
+
+2016-10-30  Gavin Smith  <address@hidden>
+
        * tp/Texinfo/Convert/HTML.pm: Rename 'ids' hash to 'seen_ids'
        and use 1 as its values instead of references to tree elements.
 

Modified: trunk/tp/Texinfo/Structuring.pm
===================================================================
--- trunk/tp/Texinfo/Structuring.pm     2016-10-30 09:45:28 UTC (rev 7478)
+++ trunk/tp/Texinfo/Structuring.pm     2016-10-30 10:53:00 UTC (rev 7479)
@@ -647,15 +647,10 @@
             if ($node->{'node_'.$direction}) {
               if ($self->{'SHOW_MENU'}) {
 
-                if (($node->{'extra'}
-            and $node->{'extra'}{'associated_section'}
-            and $node->{'extra'}{'associated_section'}{'section_up'}{'extra'}
-            and $node->{'extra'}{'associated_section'}{'section_up'}{'extra'}
-                       {'associated_node'}
-            and $node->{'extra'}{'associated_section'}{'section_up'}{'extra'}
-                       {'associated_node'}{'menus'}
-            and @{$node->{'extra'}{'associated_section'}{'section_up'}{'extra'}
-                         {'associated_node'}{'menus'}}
+                if (($section->{'section_up'}{'extra'}
+          and $section->{'section_up'}{'extra'}{'associated_node'}
+          and $section->{'section_up'}{'extra'}{'associated_node'}{'menus'}
+          and @{$section->{'section_up'}{'extra'}{'associated_node'}{'menus'}}
                      or $self->{'validatemenus'})
                     and !$node->{'menu_'.$direction}) {
                   $self->line_warn(sprintf($self->