File Coverage

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

Criterion	Covered	Total	%
statement	15	15	100.0
branch	1	2	50.0
condition	1	3	33.3
subroutine	5	5	100.0
pod	0	1	0.0
total	22	26	84.6

#===============================================================================
#
#  DESCRIPTION:  Base block
#
#       AUTHOR:  Aliaksandr P. Zahatski,
#===============================================================================
package Perl6::Pod::Lex::FormattingCode;
use strict;
use warnings;
use Perl6::Pod::Lex::Block;
use base 'Perl6::Pod::Lex::Block';
our $VERSION = '0.01';

sub new {
    my $class = shift;
    my $self = bless( ( $#_ == 0 ) ? shift : {@_}, ref($class) || $class );
    $self;
}

1;