File Coverage

blib/lib/Perl6/Pod/FormattingCode/I.pm

Criterion	Covered	Total	%
statement	15	30	50.0
branch			n/a
condition			n/a
subroutine	5	8	62.5
pod	3	3	100.0
total	23	41	56.1

package Perl6::Pod::FormattingCode::I;

=pod

=head1 NAME

Perl6::Pod::FormattingCode::I - Important

=head1 SYNOPSIS

        =para
        formatting code I

=head1 DESCRIPTION

The CE> formatting code specifies that the contained text is important; that it is of major significance. Such content would typically be rendered in italics or in CemE>...C/emE> tags.

=cut

use warnings;
use strict;
use Data::Dumper;
use Perl6::Pod::FormattingCode;
use base 'Perl6::Pod::FormattingCode';
our $VERSION = '0.01';

=head2 to_xhtml

    I

Render xhtml:

    test

=cut
sub to_xhtml {
    my ( $self, $to ) = @_;
    my $w  = $to->w;
    $w->raw("");
    $to->visit_childs($self);
    $w->raw('');
}

=head2 to_docbook

    I

Render to

   test

=cut

sub to_docbook {
    my ( $self, $to ) = @_;
    my $w  = $to->w;
    $w->raw("");
    $to->visit_childs($self);
    $w->raw('');
}

=head2 to_latex

    I

Render to

   \\emph{test}

=cut

sub to_latex {
    my ( $self, $to ) = @_;
    my $w  = $to->w;
    $w->raw("\\emph{");
    $to->visit_childs($self);
    $w->raw("}");
}

1;
__END__