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   6 use strict;
  1         2  
  1         25  
4 1     1   4 use warnings;
  1         2  
  1         22  
5            
6 1     1   358 use parent 'lib::relative::to::ParentContaining';
  1         282  
  1         5  
7              
8             sub _find {
9 2     2   6 my($class, @args) = @_;
10 2         18 $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>.