use strict;
use warnings;
BEGIN {
  # only run these tests if Digest::Perl::MD5 is installed
  require Test::More;
  eval {require Digest::Perl::MD5;};
  if ($@) {
    Test::More->import( skip_all => 'Requiring Digest::Perl::MD5 for this test' );
    exit();
  }
  else {
    Test::More->import( tests => 1+3+13 );
    delete $INC{'Digest/MD5/Perl.pm'};
  }
}
# mwuahaha!
BEGIN {unshift @INC, sub {if ($_[1] eq 'Digest/MD5.pm') {my @l = ('package Digest::MD5; 0;');return sub {shift(@l)||0}}}}
BEGIN { use_ok('PAR::Repository') };

chdir('t') if -d 't';
use lib 'lib';
# requires 3 tests to boot
require RepoTest;
#$RepoTest::Debug = 1;

my $tdir = RepoTest->TempDir;
my $repodir = File::Spec->catdir($tdir, 'repo');

chdir($tdir);

# test plain create
ok(!RepoTest->RunParrepo('create'), 'parrepo create did not die');
ok(-d $repodir, 'parrepo create created a repo dir');
my $repo = RepoTest->CanOpenRepo($repodir);
ok($repo, 'can open repo with PAR::Repository');
RepoTest->TestRepoFilesExist($repodir);
$repo->DESTROY();
ok(1, 'still alive after cleanup of repo');