diff --git a/src/GToolkit-Demo-Scripter/PatternScripterExamples.class.st b/src/GToolkit-Demo-Scripter/PatternScripterExamples.class.st
index 221f060b..8a64f8a1 100644
--- a/src/GToolkit-Demo-Scripter/PatternScripterExamples.class.st
+++ b/src/GToolkit-Demo-Scripter/PatternScripterExamples.class.st
@@ -200,7 +200,9 @@ PatternScripterExamples >> moldableLudoGamePlaygroundScript [
 	scripter do
 		label: 'Replace the code in the playground snippet';
 		id: GtSourceCoderEditorId;
-		action: [ :aSnippetElement | aSnippetElement text: self autoPlaySnippet ];
+		action: [ :aSnippetElement | 
+			aSnippetElement textualCoderViewModel coderModel
+				currentSourceString: self autoPlaySnippet ];
 		play.
 	scripter click
 		label: 'Perform the snippet and go.';