Skip to content

Instantly share code, notes, and snippets.

@tene
Created November 30, 2010 19:43
Show Gist options
  • Star 0 You must be signed in to star a gist
  • Fork 0 You must be signed in to fork a gist
  • Save tene/722248 to your computer and use it in GitHub Desktop.
Save tene/722248 to your computer and use it in GitHub Desktop.
ignore-anon-class-name.patch
diff --git a/src/Perl6/Actions.pm b/src/Perl6/Actions.pm
index 1acdee4..9e44a7b 100644
--- a/src/Perl6/Actions.pm
+++ b/src/Perl6/Actions.pm
@@ -917,7 +917,9 @@ method package_def($/, $key?) {
if $<def_module_name> {
my $name := ~$<def_module_name>[0]<longname><name>;
if $name ne '::' {
- $/.CURSOR.add_name($name, 1);
+ if $*SCOPE ne 'anon' {
+ $/.CURSOR.add_name($name, 1);
+ }
$package.name($name);
}
if $<def_module_name>[0]<signature> {
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment