"Lookup of $name outside of package that..." ==> "Cannot understand a…

…ttribute $name in this context" TimToady++
rakudo · Jun 14, 2011 · 3398e0b · 3398e0b
1 parent 2b2ac48
commit 3398e0b
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/src/Perl6/Actions.pm b/src/Perl6/Actions.pm
@@ -816,7 +816,7 @@ class Perl6::Actions is HLL::Actions {
             if $*IN_DECL ne 'variable' {
                 # Ensure attribute actaully exists before emitting lookup.
                 unless pir::can($*PACKAGE.HOW, 'get_attribute_for_usage') {
-                    $/.CURSOR.panic("Lookup of $name outside of package that can support attributes");
+                    $/.CURSOR.panic("Cannot understand $name in this context");
                 }
                 my $attr := $*PACKAGE.HOW.get_attribute_for_usage($*PACKAGE, $name);
                 if $attr {