|
|
@ -18,9 +18,9 @@ EOF |
|
|
|
my $dw = Text::Dokuwiki->new; |
|
|
|
my $dw = Text::Dokuwiki->new; |
|
|
|
isa_ok($dw, 'Text::Dokuwiki'); |
|
|
|
isa_ok($dw, 'Text::Dokuwiki'); |
|
|
|
|
|
|
|
|
|
|
|
my $table = $dw->_parse_table([ @lines ]); |
|
|
|
my $tree = $dw->_parse_table([ @lines ]); |
|
|
|
is(ref $table, 'ARRAY'); |
|
|
|
is(ref $tree, 'ARRAY'); |
|
|
|
is_deeply($table, [ |
|
|
|
is_deeply($tree, [ |
|
|
|
table => {}, |
|
|
|
table => {}, |
|
|
|
[tr => {}, |
|
|
|
[tr => {}, |
|
|
|
[td => {align => 'center'}, 'table'], |
|
|
|
[td => {align => 'center'}, 'table'], |
|
|
@ -53,3 +53,5 @@ is_deeply($table, [ |
|
|
|
[td => {align => 'center', skip => 1}, ':::'], |
|
|
|
[td => {align => 'center', skip => 1}, ':::'], |
|
|
|
], |
|
|
|
], |
|
|
|
]); |
|
|
|
]); |
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
exit 0; |
|
|
|