Repo.t 512B

1234567891011121314151617181920
  1. use Test::More;
  2. use lib 'lib';
  3. use helper;
  4. BEGIN { use_ok( 'SugarTrail::Repo' ); }
  5. require_ok( 'SugarTrail::Repo' );
  6. my $repo = SugarTrail::Repo->new(root => './t/data/strepo', vcs => 'git');
  7. &helper::dmupp(repo=>$repo);
  8. ok($repo, "repo is true");
  9. my $stm = $repo->load_stm(stm=>'/release/rc.stm');
  10. ok($stm, "stm is true");
  11. ok($stm->parse_headers(), "parse_headers() returns 6");
  12. ok($stm->parse_headers(), "parse_headers() still returns 6");
  13. &helper::dmupp(stm=>$stm);
  14. done_testing();