File Coverage

blib/lib/Perl6/Pod/FormattingCode/B.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


line stmt bran cond sub pod time code
1             package Perl6::Pod::FormattingCode::B;
2              
3             =pod
4              
5             =head1 NAME
6              
7             Perl6::Pod::FormattingCode::B - Basis/focus of sentence
8              
9             =head1 SYNOPSIS
10              
11             =para
12             formatting code B
13              
14             =head1 DESCRIPTION
15              
16             The CE> formatting code specifies that the contained text is the basis or focus of the surrounding text; that it is of fundamental significance. Such content would typically be rendered in a bold style or in CstrongE>...C/strongE> tags.
17              
18             =cut
19              
20 3     3   15 use warnings;
  3         4  
  3         81  
21 3     3   15 use strict;
  3         6  
  3         59  
22 3     3   13 use Data::Dumper;
  3         6  
  3         126  
23 3     3   14 use Perl6::Pod::FormattingCode;
  3         6  
  3         62  
24 3     3   21 use base 'Perl6::Pod::FormattingCode';
  3         4  
  3         818  
25             our $VERSION = '0.01';
26              
27             =head2 to_xhtml
28              
29             B
30              
31             Render xhtml:
32              
33             test
34            
35             =cut
36             sub to_xhtml {
37 0     0 1   my ( $self, $to ) = @_;
38 0           my $w = $to->w;
39 0           $w->raw("");
40 0           $to->visit_childs($self);
41 0           $w->raw('');
42             }
43              
44             =head2 to_docbook
45              
46             B
47              
48             Render to
49              
50             test
51              
52             =cut
53              
54             sub to_docbook {
55 0     0 1   my ( $self, $to ) = @_;
56 0           my $w = $to->w;
57 0           $w->raw("");
58 0           $to->visit_childs($self);
59 0           $w->raw('');
60             }
61              
62             =head2 to_latex
63              
64             B
65              
66             Render to
67              
68             \\textbf{test}
69              
70             =cut
71              
72             sub to_latex{
73 0     0 1   my ( $self, $to ) = @_;
74 0           my $w = $to->w;
75 0           $w->raw("\\textbf{");
76 0           $to->visit_childs($self);
77 0           $w->raw("}");
78             }
79              
80             1;
81             __END__