Commits

Anonymous committed 8558366

Renamed two methods to make them more consistent.

  • Participants
  • Parent commits 764c2a0

Comments (0)

Files changed (1)

File perl/modules/XML-Grammar-Fiction/lib/XML/Grammar/Screenplay/FromProto/Parser/QnD.pm

     return;
 }
 
-sub _close_saying
+sub _handle_close_saying
 {
     my $self = shift;
     my $open = $self->_pop_tag();
 
     if ($self->_top_is_saying())
     {
-        $self->_close_saying();
+        $self->_handle_close_saying();
     }
 
     return;
     return $self->_start_para();
 }
 
-sub _open_saying
+sub _handle_open_saying
 {
     my $self = shift;
     my $event = shift;
 
     return
         $event->is_open()
-        ? $self->_open_saying($event)
-        : $self->_close_saying();
+        ? $self->_handle_open_saying($event)
+        : $self->_handle_close_saying();
 }
 
 sub _handle_event