diff options
author | Thierry Vignaud <tv@mageia.org> | 2012-06-25 18:20:10 +0000 |
---|---|---|
committer | Thierry Vignaud <tv@mageia.org> | 2012-06-25 18:20:10 +0000 |
commit | 59223e99e4b7df180e3e176227e84ec1a81ad17c (patch) | |
tree | 88bf814f90e451e79ebcf1793a526d94047e058c /t/parse.t | |
parent | 8928ee9cbf079cfe4d3879752d1703339b4c37a1 (diff) | |
download | perl-URPM-59223e99e4b7df180e3e176227e84ec1a81ad17c.tar perl-URPM-59223e99e4b7df180e3e176227e84ec1a81ad17c.tar.gz perl-URPM-59223e99e4b7df180e3e176227e84ec1a81ad17c.tar.bz2 perl-URPM-59223e99e4b7df180e3e176227e84ec1a81ad17c.tar.xz perl-URPM-59223e99e4b7df180e3e176227e84ec1a81ad17c.zip |
style
Diffstat (limited to 't/parse.t')
-rw-r--r-- | t/parse.t | 4 |
1 files changed, 2 insertions, 2 deletions
@@ -15,7 +15,7 @@ chdir 't' if -d 't'; # shut up URPM::setVerbosity(2); -my $a = new URPM; +my $a = URPM->new; ok($a); END { system('rm -rf hdlist.cz empty_hdlist.cz headers tmp') } @@ -54,7 +54,7 @@ $a->build_hdlist( ok(-f 'hdlist.cz'); -my $b = new URPM; +my $b = URPM->new; ($start, $end) = $b->parse_hdlist('hdlist.cz', keep_all_tags => 1); is("$start $end", "0 0", 'parse_hdlist'); ok(@{$b->{depslist}} == 1); |