Fixed Warning: Use of "caller" without parentheses is ambiguous

vti · Sep 9, 2011 · dfeb271 · dfeb271
1 parent 233dc5a
commit dfeb271
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/lib/Mo.pm b/lib/Mo.pm
@@ -8,7 +8,7 @@ sub import {
     *{$p.'::extends'} = sub { @{(caller).'::ISA'} = $_[0] };
     *{$p.'::has'} = sub {
         my ($n, %a) = @_;
-        *{caller."::$n"} =
+        *{(caller)."::$n"} =
           sub {@_-1?$_[0]{$n}=$_[1]:$_[0]{$n}//=($a{default}//sub{})->($_[0])}
     };
 }