File Coverage

blib/lib/SVN/Class/Repos.pm
Criterion Covered Total %
statement 15 18 83.3
branch n/a
condition 0 2 0.0
subroutine 5 6 83.3
pod 1 1 100.0
total 21 27 77.7


line stmt bran cond sub pod time code
1             package SVN::Class::Repos;
2 2     2   12 use strict;
  2         3  
  2         86  
3 2     2   10 use warnings;
  2         3  
  2         55  
4 2     2   9 use Carp;
  2         4  
  2         121  
5 2     2   10 use Data::Dump;
  2         3  
  2         115  
6 2     2   18 use base qw( Rose::URI SVN::Class );
  2         4  
  2         2096  
7              
8             our $VERSION = '0.17';
9              
10             =head1 NAME
11              
12             SVN::Class::Repos - represents the repository of a Subversion workspace
13              
14             =head1 SYNOPSIS
15              
16             use SVN::Class;
17            
18             my $file = svn_file( 'path/to/file' );
19             my $info = $file->info;
20             my $url = $info->url;
21             print "repository URL is $url\n";
22            
23             =head1 DESCRIPTION
24              
25             SVN::Class::URL represents the source repository for a workspace.
26              
27             =head1 METHODS
28              
29             SVN::Class::URL inherits from Rose::URI and SVN::Class.
30              
31             =cut
32              
33             =head2 init
34              
35             Override the base Rose::URI method to set some default values in object.
36              
37             =cut
38              
39             sub init {
40 0     0 1   my $self = shift;
41 0           $self->SUPER::init(@_);
42 0   0       $self->{svn} ||= 'svn';
43             }
44              
45             1;
46              
47             __END__