diff options
Diffstat (limited to 't/05shiny.t')
-rw-r--r-- | t/05shiny.t | 40 |
1 files changed, 40 insertions, 0 deletions
diff --git a/t/05shiny.t b/t/05shiny.t new file mode 100644 index 0000000..9b5875d --- /dev/null +++ b/t/05shiny.t @@ -0,0 +1,40 @@ +=pod + +=encoding utf-8 + +=head1 PURPOSE + +Very basic Exporter::Shiny test. + +=head1 AUTHOR + +Toby Inkster E<lt>tobyink@cpan.orgE<gt>. + +=head1 COPYRIGHT AND LICENCE + +This software is copyright (c) 2014 by Toby Inkster. + +This is free software; you can redistribute it and/or modify it under +the same terms as the Perl 5 programming language system itself. + + +=cut + +use strict; +use warnings; +use Test::More tests => 1; + +{ + package Local::Foo; + use Exporter::Shiny qw(foo bar); + sub foo { + return 42; + } + sub bar { + return 666; + } +} + +use Local::Foo qw(foo); + +is(foo(), 42); |