Anonymous avatar Anonymous committed 620f42b

Extracted _new_node() from various other places.

Comments (0)

Files changed (1)

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

     }
 
     return
-        XML::Grammar::Fiction::FromProto::Node::Saying->new(
-            character => $first->{character},
-            children => 
-                $self->_new_list([ $first->{para}, @others ]),
-        );
+        _new_node({
+                t => "Saying",
+                character => $first->{character},
+                children => 
+                    $self->_new_list([ $first->{para}, @others ]),
+        });
 }
 
 sub _parse_desc_unit
         Carp::confess (qq{Description ("[ ... ]") that started on line $start_line does not terminate anywhere.});
     }
 
-    return XML::Grammar::Fiction::FromProto::Node::Description->new(
-        children => 
-        $self->_new_list(
+    return _new_node({
+            t => "Description",
+            children => $self->_new_list(
             [
                 map { 
                 $self->_new_para($_),
                 } @paragraphs
-            ],
-        )
-    );
+            ],),
+    });
 }
 
 sub _parse_non_tag_text_unit
     {
         my $text = $self->_consume_up_to(qr{-->});
 
-        return
-            XML::Grammar::Fiction::FromProto::Node::Comment->new(
-                text => $text
-            );
+        return _new_node({ t => "Comment", text => $text, });
     }
 
     my $open = $self->_parse_opening_tag();
Tip: Filter by directory path e.g. /media app.js to search for public/media/app.js.
Tip: Use camelCasing e.g. ProjME to search for ProjectModifiedEvent.java.
Tip: Filter by extension type e.g. /repo .js to search for all .js files in the /repo directory.
Tip: Separate your search with spaces e.g. /ssh pom.xml to search for src/ssh/pom.xml.
Tip: Use ↑ and ↓ arrow keys to navigate and return to view the file.
Tip: You can also navigate files with Ctrl+j (next) and Ctrl+k (previous) and view the file with Ctrl+o.
Tip: You can also navigate files with Alt+j (next) and Alt+k (previous) and view the file with Alt+o.