File Coverage

blib/lib/Pod/Weaver/Config/Assembler.pm
Criterion Covered Total %
statement 11 11 100.0
branch n/a
condition n/a
subroutine 4 4 100.0
pod 1 1 100.0
total 16 16 100.0


line stmt bran cond sub pod time code
1             package Pod::Weaver::Config::Assembler;
2             # ABSTRACT: Pod::Weaver-specific subclass of Config::MVP::Assembler
3             $Pod::Weaver::Config::Assembler::VERSION = '4.017';
4 10     10   80 use Moose;
  10         24  
  10         96  
5             extends 'Config::MVP::Assembler';
6             with 'Config::MVP::Assembler::WithBundles';
7              
8 10     10   72424 use String::RewritePrefix;
  10         30  
  10         162  
9              
10 10     10   2104 use namespace::autoclean;
  10         26  
  10         125  
11              
12             sub expand_package {
13 209     209 1 606176 my $str = $_[1];
14              
15 209         2034 return scalar String::RewritePrefix->rewrite(
16             {
17             '' => 'Pod::Weaver::Section::',
18             '-' => 'Pod::Weaver::Plugin::',
19             '@' => 'Pod::Weaver::PluginBundle::',
20             '=' => '',
21             },
22             $str,
23             );
24             }
25              
26             __PACKAGE__->meta->make_immutable;
27             1;
28              
29             __END__
30              
31             =pod
32              
33             =encoding UTF-8
34              
35             =head1 NAME
36              
37             Pod::Weaver::Config::Assembler - Pod::Weaver-specific subclass of Config::MVP::Assembler
38              
39             =head1 VERSION
40              
41             version 4.017
42              
43             =head1 AUTHOR
44              
45             Ricardo SIGNES <rjbs@cpan.org>
46              
47             =head1 COPYRIGHT AND LICENSE
48              
49             This software is copyright (c) 2021 by Ricardo SIGNES.
50              
51             This is free software; you can redistribute it and/or modify it under
52             the same terms as the Perl 5 programming language system itself.
53              
54             =cut