make message of X::Inheritance::Unsupported less confusing

rakudo · Aug 23, 2012 · befe7ca · befe7ca
1 parent c7f6492
commit befe7ca
Showing 1 changed file with 2 additions and 2 deletions.
diff --git a/src/core/Exception.pm b/src/core/Exception.pm
@@ -853,8 +853,8 @@ my class X::Inheritance::Unsupported does X::Comp {
     has $.child-typename;
     has $.parent;
     method message {
-        $.child-typename ~ ' cannot inherit from ' ~
-        $.parent.^name ~ ' because it is not inheritable';
+        $.parent.^name ~ ' does not support inheritance, so '
+        ~ $.child-typename ~ ' cannot inherit from it';
     }
 }