Permalink
Browse files

fix XXX export bug

  • Loading branch information...
1 parent e4ccb5c commit cc49919a2ae100365a836aa34f1dc225878198fc @ingydotnet committed with May 24, 2012
Showing with 5 additions and 1 deletion.
  1. +1 −1 lib/TestML.pm
  2. +4 −0 t/xxx.t
View
@@ -119,7 +119,7 @@ sub import {
*{$p.'::bool'} = \&bool;
*{$p.'::list'} = \&list;
- if (not defined &{$pkg.'::XXX'}) {
+ if (not defined &{$p.'::XXX'}) {
*{$p.'::WWW'} = \&WWW;
*{$p.'::XXX'} = \&XXX;
*{$p.'::YYY'} = \&YYY;
View
@@ -0,0 +1,4 @@
+use TestML;
+use Test::More tests => 1;
+
+ok defined &XXX;

0 comments on commit cc49919

Please sign in to comment.