* renamed module

lib/Text/Dokuwiki/Parser.pm

@@ -1,12 +1,10 @@
-package Text::Dokuwiki;
+package Text::Dokuwiki::Parser;
 
 use strict;
 use warnings;
 use feature qw/ switch /;
 use utf8;
 
-use Data::Dumper;
-
 sub new {
   my ($class) = @_;
   my $self = {};

t/parser-include.t

@@ -5,10 +5,10 @@ use warnings;
 use utf8;
 
 use Test::More tests => 8;
-use Text::Dokuwiki;
+use Text::Dokuwiki::Parser;
 
-my $dw = Text::Dokuwiki->new;
+my $dw = Text::Dokuwiki::Parser->new;
-isa_ok($dw, 'Text::Dokuwiki');
+isa_ok($dw, 'Text::Dokuwiki::Parser');
 
 my $elem = $dw->_parse_include('{{image.png}}');
 is(ref $elem, 'ARRAY');

t/parser-lists.t

@@ -5,7 +5,7 @@ use warnings;
 use utf8;
 
 use Test::More tests => 3;
-use Text::Dokuwiki;
+use Text::Dokuwiki::Parser;
 
 my @lines = split /\n/, <<EOF;
   * level1 item1
@@ -18,8 +18,8 @@ my @lines = split /\n/, <<EOF;
   - level1 of 2nd list, item2
 EOF
 
-my $dw = Text::Dokuwiki->new;
+my $dw = Text::Dokuwiki::Parser->new;
-isa_ok($dw, 'Text::Dokuwiki');
+isa_ok($dw, 'Text::Dokuwiki::Parser');
 my @lists = $dw->_parse_list([ @lines ]);
 
 is (scalar @lists, 2);

t/parser-table.t

@@ -5,7 +5,7 @@ use warnings;
 use utf8;
 
 use Test::More tests => 3;
-use Text::Dokuwiki;
+use Text::Dokuwiki::Parser;
 
 my @lines = split /\n/, <<EOF;
 | table ^ head1 ^ head2 ^  sum |
@@ -15,8 +15,8 @@ my @lines = split /\n/, <<EOF;
 ^ data4 | 4-1   |  4-2  | :::  |
 EOF
 
-my $dw = Text::Dokuwiki->new;
+my $dw = Text::Dokuwiki::Parser->new;
-isa_ok($dw, 'Text::Dokuwiki');
+isa_ok($dw, 'Text::Dokuwiki::Parser');
 
 my $tree = $dw->_parse_table([ @lines ]);
 is(ref $tree, 'ARRAY');

t/parser-text-1.t

@@ -5,10 +5,10 @@ use warnings;
 use utf8;
 
 use Test::More tests => 3;
-use Text::Dokuwiki;
+use Text::Dokuwiki::Parser;
 
-my $dw = Text::Dokuwiki->new;
+my $dw = Text::Dokuwiki::Parser->new;
-isa_ok($dw, 'Text::Dokuwiki');
+isa_ok($dw, 'Text::Dokuwiki::Parser');
 
 my $text = "This is text with //inline **formatting**// rules [[http://site.com|and]] links.";
 my $tree = [ $dw->_parse_text($text) ];