瀏覽代碼

Switched to Perl dmup

Alois Mahdal 11 年之前
父節點
當前提交
9fedcf2b33
共有 1 個檔案被更改,包括 2 行新增2 行删除
  1. 2
    2
      t/Repo.t

+ 2
- 2
t/Repo.t 查看文件

7
 require_ok( 'SugarTrail::Repo' );
7
 require_ok( 'SugarTrail::Repo' );
8
 
8
 
9
 my $repo = SugarTrail::Repo->new(root => './t/data/strepo', vcs => 'git');
9
 my $repo = SugarTrail::Repo->new(root => './t/data/strepo', vcs => 'git');
10
-&helper::dmup(repo=>$repo);
10
+&helper::dmupp(repo=>$repo);
11
 ok($repo,           "repo is true");
11
 ok($repo,           "repo is true");
12
 
12
 
13
 my $stm = $repo->load_stm(stm=>'/release/rc.stm');
13
 my $stm = $repo->load_stm(stm=>'/release/rc.stm');
14
 ok($stm,            "stm is true");
14
 ok($stm,            "stm is true");
15
 
15
 
16
 ok($stm->parse_headers(), "parse_headers() returns true");
16
 ok($stm->parse_headers(), "parse_headers() returns true");
17
-&helper::dmup(stm=>$stm);
17
+&helper::dmupp(stm=>$stm);
18
 
18
 
19
 done_testing();
19
 done_testing();