is( $elems->[0]->as_string, "=this is\nstill code=",
            "elem 0 as_string");
        is( $elems->[1]->as_string, "\n\n=this is\nno longer\ncode=\n",
            "elem 1 as_string");
    },
);

# markup can contain links, even *[[link][description with * in it]]*. also # timestamp, etc. test_parse( name => 'link inside markup', filter_elements => 'Org::Element::Text', doc => <<'_', *bolded [[link]]* _ test_after_parse => sub { my %args = @_; my $doc = $args{result}; my $elems = $args{elements}; is($elems->[0]->style, "B", "elem 0 bold"); is($elems->[0]->children->[0]->as_string, "bolded ", "bolded text"); is(ref($elems->[0]->children->[1]), "Org::Element::Link", "link inside bolded"); }, );

done_testing();

2 POD Errors

The following errors were encountered while parsing the POD:

Around line 91:

Unknown directive: =this

Around line 94:

Unknown directive: =this