use strict;
use warnings;
use Test::More;
use Log::Any::Test;
use Log::Any::Adapter 'Test';
use Log::Any::Adapter::Util qw(cmp_deeply);

plan tests => 1;

my $log = Log::Any->get_logger();
my @params = ( "args for %s: %s", 'app', [ 'foo', { 'bar' => 5 } ] );
$log->info("not %s", "sprintf");
$log->debugf(@params);
cmp_deeply(
    $log->msgs,
    [
        {
            message     => "not \%s sprintf",
            level    => 'info',
            category => 'main'
        },
        {
            message     => q|args for app: ["foo",{bar => 5}]|,
            level    => 'debug',
            category => 'main'
        }
    ],
    'message was formatted'
);