File Coverage

blib/lib/MojoMojo/Formatter/File/DocBook.pm
Criterion Covered Total %
statement 10 13 76.9
branch 1 2 50.0
condition n/a
subroutine 3 4 75.0
pod 2 2 100.0
total 16 21 76.1


line stmt bran cond sub pod time code
1             package MojoMojo::Formatter::File::DocBook;
2              
3 26     26   104048 use parent qw/MojoMojo::Formatter/;
  26         64  
  26         152  
4              
5 26     26   1437 use MojoMojo::Formatter::DocBook;
  26         58  
  26         344  
6              
7              
8             =head1 NAME
9              
10             MojoMojo::Formatter::File::DocBook - format Docbook in xhtml
11              
12             =head1 DESCRIPTION
13              
14              
15             =head1 METHODS
16              
17             =head2 can_format
18              
19             Can format DocBook (xml)
20              
21             =cut
22              
23             sub can_format {
24 2     2 1 5 my $self = shift;
25 2         4 my $type = shift;
26              
27 2 50       8 return 1 if ( $type eq "xml" );
28 2         12 return 0;
29             }
30              
31              
32             =head2 to_xhtml <dbk>
33              
34             Takes DocBook documentation and renders it as XHTML.
35              
36             =cut
37              
38             sub to_xhtml {
39 0     0 1   my ( $class, $dbk ) = @_;
40 0           my $result;
41              
42 0           return MojoMojo::Formatter::DocBook->to_xhtml($dbk);
43             }
44              
45              
46             =head1 SEE ALSO
47              
48             L<MojoMojo>, L<Module::Pluggable::Ordered>
49              
50             =head1 AUTHORS
51              
52             Daniel Brosseau <dab@catapulse.org>
53              
54             =head1 LICENSE
55              
56             This module is licensed under the same terms as Perl itself.
57              
58             =cut
59              
60             1;