File: 16-custom-export-error-handling.t

package info (click to toggle)
libtest-mockrandom-perl 1.01-3
  • links: PTS, VCS
  • area: main
  • in suites: bookworm, forky, sid, trixie
  • size: 256 kB
  • sloc: perl: 326; makefile: 2
file content (16 lines) | stat: -rwxr-xr-x 458 bytes parent folder | download | duplicates (3) 
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
 
# Test::MockRandom
use strict;

use Test::More tests => 1;

#--------------------------------------------------------------------------#
# Test package overriding
#--------------------------------------------------------------------------#

eval {
    require Test::MockRandom;
    Test::MockRandom->import(
        { bogus => [ { 'OverrideTest' => 'random' }, 'AnotherOverride' ], } );
};
ok( $@, "Does custom import spec croak on unrecognized symbol?" );