aboutsummaryrefslogtreecommitdiffstats
path: root/t/fatal.t
diff options
context:
space:
mode:
authorThierry Vignaud <tv@mageia.org>2012-06-25 18:20:10 +0000
committerThierry Vignaud <tv@mageia.org>2012-06-25 18:20:10 +0000
commit59223e99e4b7df180e3e176227e84ec1a81ad17c (patch)
tree88bf814f90e451e79ebcf1793a526d94047e058c /t/fatal.t
parent8928ee9cbf079cfe4d3879752d1703339b4c37a1 (diff)
downloadperl-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/fatal.t')
-rw-r--r--t/fatal.t4
1 files changed, 2 insertions, 2 deletions
diff --git a/t/fatal.t b/t/fatal.t
index 0cfeafa..4638983 100644
--- a/t/fatal.t
+++ b/t/fatal.t
@@ -4,7 +4,7 @@ use strict;
use Test::More tests => 8;
use URPM;
-my $u = new URPM;
+my $u = URPM->new;
eval { $u->parse_hdlist('non-existent'); };
like( $@, qr/^cannot open hdlist file non-existent/, 'fatal error on hdlist not found' );
@@ -13,7 +13,7 @@ eval { $u->parse_synthesis('non-existent'); };
like( $@, qr/^unable to read synthesis file non-existent/, 'fatal error on synthesis not found' );
is( $! + 0, $!{ENOENT}, '$! is ENOENT' );
-my $v = new URPM( nofatal => 1 );
+my $v = URPM->new( nofatal => 1 );
eval { $v->parse_hdlist('non-existent'); };
is( $@, '', 'no error on hdlist not found' );