use strict;
use warnings;
use Test::More tests => 2;
use Email::MIME::Kit;
my $kit = Email::MIME::Kit->new({
source => 't/kits/test.mkit',
});
my $email_1 = $kit->assemble({
name => 'Reticulo Johnson',
game => "eatin' pancakes",
});
like(
$email_1->body,
qr{\QReticulo Johnson is my name, eatin' pancakes is my game},
"tt stuff happened",
);
my $email_2 = $kit->assemble({
name => 'Bryan Allen',
game => "nukin' jar cheese",
});
like(
$email_2->body,
qr{\QBryan Allen is my name, nukin' jar cheese is my game},
"tt stuff happened",
);