[pod-constants.git] / t / ReEntrancyTest.pm


package ReEntrancyTest;

use strict;
use vars qw($wohoo $foo);

use Pod::Constants -debug => 1, -trim => 1, foobar => \$wohoo;

=head1 foobar

Re-entrancy works!

=cut

1;
Commit	Line	Data
f46dd377 MG	1
	2	package ReEntrancyTest;
	3
	4	use strict;
	5	use vars qw($wohoo $foo);
	6
	7	use Pod::Constants -debug => 1, -trim => 1, foobar => \$wohoo;
	8
	9	=head1 foobar
	10
	11	Re-entrancy works!
	12
	13	=cut
	14
	15	1;