Added Emitter class

git-svn-id: http://svn.kwiki.org/kwiki/trunk/src/ingy/WikiText@326 4b3b33bc-d223-0410-9309-b363ae52eedd
audreyt · Feb 26, 2008 · 3668836 · 3668836
1 parent 7dafc4f
commit 3668836
Show file tree

Hide file tree

Showing 2 changed files with 24 additions and 17 deletions.
diff --git a/lib/WikiText/Emitter.pm b/lib/WikiText/Emitter.pm
@@ -0,0 +1,23 @@
+package WikiText::Emitter;
+use strict;
+use warnings;
+
+use base 'WikiText::Receiver';
+
+sub init {
+    my $self = shift;
+    $self->{output} = '';
+}
+
+sub content {
+    my $self = shift;
+    return $self->{output};
+}
+
+sub insert {
+    my $self = shift;
+    my $ast = shift;
+    $self->{output} .= $ast->{output} || '';
+}
+
+1;
diff --git a/lib/WikiText/HTML/Emitter.pm b/lib/WikiText/HTML/Emitter.pm
@@ -2,7 +2,7 @@ package WikiText::HTML::Emitter;
 use strict;
 use warnings;
 
-use base 'WikiText::Receiver';
+use base 'WikiText::Emitter';
 use CGI::Util;
 
 my $type_tags = {
@@ -11,22 +11,6 @@ my $type_tags = {
     wikilink => 'a',
 };
 
-sub init {
-    my $self = shift;
-    $self->{output} = '';
-}
-
-sub content {
-    my $self = shift;
-    return $self->{output};
-}
-
-sub insert {
-    my $self = shift;
-    my $ast = shift;
-    $self->{output} .= $ast->{output} || '';
-}
-
 sub uri_escape {
     $_ = shift;
     s/ /\%20/g;