The Perl Toolchain Summit needs more sponsors. If your company depends on Perl, please support this very important event.
# Test for RT48642 by Olivier Mengué

use Test::More tests => 1;

{
    package Template::Declare::TagSet::FooBarBaz;
    use base 'Template::Declare::TagSet';
    sub get_tag_list {
        [qw/foo bar baz/]
    }
}

eval "use Template::Declare::Tags 'FooBarBaz'";
my $res = $@;
SKIP: {
    skip "T::D::TS::FooBarBaz.pm exists, can't test!" if exists $INC{'Template/Declare/TagSet/FooBarBaz.pm'};
    ok(!$res, "use inline TagSet");
    diag $res if $res;
}