Commit | Line | Data |
941bb5a1 |
1 | use strict; |
2 | use warnings; |
3 | use FindBin qw/$Bin/; |
4 | use Test::More qw/no_plan/; |
5 | |
6 | use Data::Dumper; |
7 | |
8 | BEGIN { use_ok 'Gitalist::Git::Util' } |
9 | |
10 | use Path::Class; |
4baaeeef |
11 | my $gitdir = dir("$Bin/../lib/repositories/repo1"); |
12 | |
941bb5a1 |
13 | my $proj = Gitalist::Git::Util->new( |
4baaeeef |
14 | gitdir => $gitdir, |
941bb5a1 |
15 | ); |
16 | isa_ok($proj, 'Gitalist::Git::Util'); |
17 | |
18 | like( $proj->_git, qr#/git$#, 'git binary found'); |
19 | isa_ok($proj->_gpp, 'Git::PurePerl', 'gpp instance created'); |
4baaeeef |
20 | is($proj->gitdir, $gitdir, 'repository path is set'); |
941bb5a1 |
21 | |
22 | |
23 | |