diff options
author | Thierry Vignaud <tv@mageia.org> | 2012-06-26 18:18:30 +0000 |
---|---|---|
committer | Thierry Vignaud <tv@mageia.org> | 2012-06-26 18:18:30 +0000 |
commit | f3a5346c94ceed8c28a10511db0b1019ec532971 (patch) | |
tree | 20a447700578ea9fcd83842600b55f1a0299329a /t/fatal.t | |
parent | 0f5e4ddc50cf8f93de30d8c10477fff5d9d99282 (diff) | |
parent | 4e351504dc092a0a99f33dcbd301f48877eaa2f0 (diff) | |
download | perl-URPM-f3a5346c94ceed8c28a10511db0b1019ec532971.tar perl-URPM-f3a5346c94ceed8c28a10511db0b1019ec532971.tar.gz perl-URPM-f3a5346c94ceed8c28a10511db0b1019ec532971.tar.bz2 perl-URPM-f3a5346c94ceed8c28a10511db0b1019ec532971.tar.xz perl-URPM-f3a5346c94ceed8c28a10511db0b1019ec532971.zip |
branch
Diffstat (limited to 't/fatal.t')
-rw-r--r-- | t/fatal.t | 4 |
1 files changed, 2 insertions, 2 deletions
@@ -4,7 +4,7 @@ use strict; use Test::More tests => 8; use URPM; -my $u = URPM->new; +my $u = new URPM; 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 = URPM->new( nofatal => 1 ); +my $v = new URPM( nofatal => 1 ); eval { $v->parse_hdlist('non-existent'); }; is( $@, '', 'no error on hdlist not found' ); |