[S32::Exception] improve error message for X::Syntax::Augment::Role

Raku · Aug 24, 2012 · 771d505 · 771d505
1 parent 2774606
commit 771d505
Showing 1 changed file with 4 additions and 3 deletions.
diff --git a/S32-setting-library/Exception.pod b/S32-setting-library/Exception.pod
@@ -17,8 +17,8 @@ Authors of previous versions of this document:
 
     Created: 26 Feb 2009
 
-    Last Modified: 23 August 2012
-    Version: 23
+    Last Modified: 24 August 2012
+    Version: 24
 
 The document is a draft.
 
@@ -640,7 +640,8 @@ Thrown when C<augment> is used without C<use MONKEY_TYPING>.
 Thrown when trying to agument a role.
 
     my class X::Syntax::Augment::Role does X::Syntax {
-        method message() { "Cannot augment a role, since roles are immutable" };
+        has $.role-name;
+        method message() { "Cannot augment role $.role-name, since roles are immutable" };
     }
 
 =head3 X::Syntax::Placeholder