Made an attempt to fix the hardcoded CSS urls.
[catagits/Gitalist.git] / t / 02git_util.t
CommitLineData
941bb5a1 1use strict;
2use warnings;
3use FindBin qw/$Bin/;
7a1d9791 4use Test::More;
941bb5a1 5
6use Data::Dumper;
7
7a1d9791 8BEGIN {
9 use_ok 'Gitalist::Git::Util';
44a9ed75 10 use_ok 'Gitalist::Git::Repository';
7a1d9791 11}
941bb5a1 12
13use Path::Class;
58251520 14my $gitdir = dir("$Bin/lib/repositories/repo1");
4baaeeef 15
44a9ed75 16my $proj = Gitalist::Git::Repository->new($gitdir);
7a1d9791 17my $util = Gitalist::Git::Util->new(
82bc0f05 18 repository => $proj,
7a1d9791 19);
20isa_ok($util, 'Gitalist::Git::Util');
941bb5a1 21
e66671b8 22like( $util->_git, qr#/git$#, 'git binary found');
defb0050 23isa_ok($util->gpp, 'Git::PurePerl', 'gpp instance created');
941bb5a1 24
7a1d9791 25done_testing;