Commits

Anonymous committed 6fac8e5

Renamed info to info_node to make it more descriptive.

  • Participants
  • Parent commits edc9750

Comments (0)

Files changed (1)

File XML-Grammar-Fortune/module/lib/XML/Grammar/Fortune/ToText.pm

 
     if (() = $self->_fortune()->findnodes("descendant::info/*"))
     {
-        $self->_render_info();
+        $self->_render_info_node();
     }
 
     return;
 
     if (() = $self->_fortune()->findnodes("descendant::info/*"))
     {
-        $self->_render_info();
+        $self->_render_info_node();
     }
 
     return;
 
     if (() = $self->_fortune()->findnodes("descendant::info/*"))
     {
-        $self->_render_info();
+        $self->_render_info_node();
     }
 
     return;
 
     if (() = $self->_fortune()->findnodes("descendant::info/*"))
     {
-        $self->_render_info();
+        $self->_render_info_node();
     }
 
     return;
 
 }
 
-sub _render_info
+sub _render_info_node
 {
     my ($self) = @_;
 
 
     $self->_start_new_line;
 
-    my ($info) = $fortune->findnodes("descendant::info");
+    my ($info_node) = $fortune->findnodes("descendant::info");
 
-    foreach my $field_node ($self->_get_info_node_fields($info))
+    foreach my $field_node ($self->_get_info_node_fields($info_node))
     {
-        $self->_out_info_field_node($info, $field_node);
+        $self->_out_info_field_node($info_node, $field_node);
     }
 
     return;