File Coverage

blib/lib/Pod/PseudoPod/Book.pm

Criterion	Covered	Total	%
statement	12	18	66.6
branch	0	2	0.0
condition	0	3	0.0
subroutine	4	6	66.6
pod	1	2	50.0
total	17	31	54.8

package Pod::PseudoPod::Book;
# ABSTRACT: manages books written in the Pod::PseudoPod format

use strict;
use warnings;

use App::Cmd::Setup -app;
use Config::Tiny;

sub config
{
    my $app = shift;
    $app->{config} ||= Config::Tiny->read( 'book.conf' );
}

sub get_command
{
    my $self    = shift;
    my ($cmd, $opt, @args) = $self->SUPER::get_command( @_ );

    unshift @args, 'build_xhtml' if $cmd eq 'buildepub';

    return $cmd, $opt, @args;
}

1;

__END__

=pod

=encoding UTF-8

=head1 NAME

Pod::PseudoPod::Book - manages books written in the Pod::PseudoPod format

=head1 VERSION

version 1.20210620.2051

=head1 AUTHOR

chromatic <[e-mail]>

=head1 COPYRIGHT AND LICENSE

This software is copyright (c) 2011 by chromatic.

This is free software; you can redistribute it and/or modify it under
the same terms as the Perl 5 programming language system itself.

=cut