X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=t%2F02git_CollectionOfRepositories_FromDirectory.t;h=69c812773834262d6b4b61b809a3e8743b6e5a6a;hb=2d52ed84dbce5932f14972ba91a33de23faac648;hp=e045a44ff9cfe3aff483c481d0a60822b522cb48;hpb=1d72763415136a65d6b965ab168403e99c1cf9c3;p=catagits%2FGitalist.git diff --git a/t/02git_CollectionOfRepositories_FromDirectory.t b/t/02git_CollectionOfRepositories_FromDirectory.t index e045a44..69c8127 100644 --- a/t/02git_CollectionOfRepositories_FromDirectory.t +++ b/t/02git_CollectionOfRepositories_FromDirectory.t @@ -11,11 +11,12 @@ use warnings; use Test::More qw/no_plan/; use Test::Exception; +use Path::Class 'dir'; use Data::Dumper; BEGIN { use_ok 'Gitalist::Git::CollectionOfRepositories::FromDirectory' } -my $repo_dir = "$Bin/lib/repositories"; +my $repo_dir = dir( "$Bin/lib/repositories" ); my $repo = Gitalist::Git::CollectionOfRepositories::FromDirectory->new( repo_dir => $repo_dir ); isa_ok($repo, 'Gitalist::Git::CollectionOfRepositories::FromDirectory'); @@ -26,9 +27,6 @@ use Path::Class; my $repoBare = Path::Class::Dir->new('t/lib/repositories/bare.git'); ok( $repo->_is_git_repo( $repoBare ), 'is_git_repo true for bare git repo' ); -# 'working' is a working copy w/ git repo in the repository dir -my $repoWorking = Path::Class::Dir->new('t/lib/repositories/working'); - # 'empty.git' is an empty directory in the repository dir my $repoEmpty = Path::Class::Dir->new('t/lib/repositories/empty.git'); ok( ! $repo->_is_git_repo( $repoEmpty ), 'is_git_repo is false for empty dir' );