The Perl Toolchain Summit needs more sponsors. If your company depends on Perl, please support this very important event.
use strict;
use warnings;

use Test::More tests => 2;
use Test::Fatal;
use Log::Contextual qw(:log);

like(
   exception { Log::Contextual::set_logger() },
   qr/set_logger is no longer a direct sub in Log::Contextual/,
   'Log::Contextual::set_logger dies',
);

like(
   exception { Log::Contextual::with_logger() },
   qr/with_logger is no longer a direct sub in Log::Contextual/,
   'Log::Contextual::with_logger dies',
);