diff --git a/src/Perl6/Metamodel/BUILDPLAN.nqp b/src/Perl6/Metamodel/BUILDPLAN.nqp
index 01e3a55027b..7f897c6e8b4 100644
--- a/src/Perl6/Metamodel/BUILDPLAN.nqp
+++ b/src/Perl6/Metamodel/BUILDPLAN.nqp
@@ -50,11 +50,9 @@ role Perl6::Metamodel::BUILDPLAN {
                               workaround =>
                                 "Create/Adapt TWEAK method in class "
                                   ~ $obj.HOW.name($obj)
-                                  ~ ", e.g:\n    method TWEAK() \{ "
+                                  ~ ", e.g:\n    method TWEAK(:"
                                   ~ $_.name
-                                  ~ " = (initial values) unless %_<"
-                                  ~ nqp::substr($_.name,2)
-                                  ~ ">:exists }"
+                                  ~ ' = (initial values)) { }'
                             ).throw;
                         }
                     }