From 7e7ddbe33ca34359d711aee1e0ddebaeb40c2a18 Mon Sep 17 00:00:00 2001 From: Lorry Tar Creator Date: Thu, 25 Jun 2015 04:47:55 +0000 Subject: Class-Load-0.23 --- t/011-without-xs.t | 22 ++++++++++++++++++++++ 1 file changed, 22 insertions(+) create mode 100644 t/011-without-xs.t (limited to 't/011-without-xs.t') diff --git a/t/011-without-xs.t b/t/011-without-xs.t new file mode 100644 index 0000000..e1d1e43 --- /dev/null +++ b/t/011-without-xs.t @@ -0,0 +1,22 @@ +use strict; +use warnings; +use Test::More 0.88; + +use Test::Requires { + 'Test::Without::Module' => 0, +}; + +use Test::Without::Module 'Class::Load::XS'; + +{ + my @warnings; + local $SIG{__WARN__} = sub { push @warnings, @_ }; + require Class::Load; + + is_deeply( + \@warnings, [], + 'no warning from Class::Load when Class::Load::XS is not available' + ); +} + +done_testing(); -- cgit v1.2.1