File Coverage

blib/lib/lib/relative/to/SvnCheckout.pm
Criterion Covered Total %
statement 11 11 100.0
branch n/a
condition n/a
subroutine 4 4 100.0
pod n/a
total 15 15 100.0


line stmt bran cond sub pod time code
1             package lib::relative::to::SvnCheckout;
2              
3 1     1   7 use strict;
  1         1  
  1         30  
4 1     1   4 use warnings;
  1         2  
  1         30  
5            
6 1     1   466 use parent 'lib::relative::to::ParentContaining';
  1         313  
  1         5  
7              
8             sub _find {
9 1     1   3 my($class, @args) = @_;
10 1         6 $class->SUPER::_find('.svn/entries', @args);
11             }
12              
13             1;
14              
15             =head1 NAME
16              
17             lib::relative::to::SvnCheckout
18              
19             =head1 SYNOPSIS
20              
21             use lib::relative::to SvnCheckout => qw(lib t/lib);
22              
23             =head1 DESCRIPTION
24              
25             A plugin for L for finding the root of a Subversion checkout and then adding some directories under it to C<@INC>.
26              
27             It works by looking for the parent directory containing C<.svn/entries>.