Commits

Anonymous committed 127c303

Handling <a /> only in XML::Grammar::Screenplay. It's not in ::Fiction.

  • Participants
  • Parent commits 5e7a086

Comments (0)

Files changed (3)

perl/modules/XML-Grammar-Fiction/Changes

 Revision history for XML-Grammar-Fiction.
 
+    * Now handling the a element only in XML::Grammar::Screenplay - it
+    does not exist in ::Fiction.
+
 0.1.5       Mon Apr  4 23:08:18 IDT 2011
 
     * Add the tag-release.pl script to tag a release using svn.berlios.de.

perl/modules/XML-Grammar-Fiction/lib/XML/Grammar/FictionBase/TagsTree2XML.pm

     $self->_write_scene({scene => $elem});
 }
 
-sub _handle_elem_of_name_a
-{
-    my ($self, $elem) = @_;
-    $self->_output_tag_with_childs(
-        {
-            start => ["ulink", "url" => $elem->lookup_attr("href")],
-            elem => $elem,
-        }
-    );
-
-    return;
-}
-
 sub _handle_elem_of_name_b
 {
     my ($self, $elem) = @_;

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

     return "para";
 }
 
+sub _handle_elem_of_name_a
+{
+    my ($self, $elem) = @_;
+    $self->_output_tag_with_childs(
+        {
+            start => ["ulink", "url" => $elem->lookup_attr("href")],
+            elem => $elem,
+        }
+    );
+
+    return;
+}
+
 sub _handle_elem_of_name_section
 {
     my ($self, $elem) = @_;