Wordwrap X::(Parameter|Syntax::Variable)::BadType message

Also suggest using 'class' instead.
rakudo · Jul 6, 2020 · 58685ee · 58685ee
1 parent 9396343
commit 58685ee
Showing 1 changed file with 2 additions and 2 deletions.
diff --git a/src/core.c/Exception.pm6 b/src/core.c/Exception.pm6
@@ -1248,7 +1248,7 @@ my class X::Parameter::BadType does X::Comp {
     has Mu $.type;
     method message() {
         my $what = ~$!type.HOW.WHAT.^name.match(/ .* '::' <(.*)> HOW/) // 'Namespace';
-        "$what $!type.^name() is insufficiently type-like to qualify a parameter"
+        "$what '$!type.^name()' is insufficiently type-like to qualify a parameter.  Did you mean 'class'?".naive-word-wrapper
     }
 }
 
@@ -1495,7 +1495,7 @@ my class X::Syntax::Variable::BadType does X::Comp {
     has Mu $.type;
     method message() {
         my $what = ~$!type.HOW.WHAT.^name.match(/ .* '::' <(.*)> HOW/) // 'Namespace';
-        "$what $!type.^name() is insufficiently type-like to qualify a variable"
+        "$what '$!type.^name()' is insufficiently type-like to qualify a variable.  Did you mean 'class'?".naive-word-wrapper
     }
 }