From 68eb9a2a99720ea450572cbef6447f34f3a53812 Mon Sep 17 00:00:00 2001
From: Martin Dias <tinchodias@gmail.com>
Date: Tue, 10 Sep 2024 12:56:49 -0300
Subject: [PATCH] Some tests require that text adapters respond to text:

---
 src/Spec-Toplo/SpToploAbstractTextAdapter.class.st | 6 ++++++
 1 file changed, 6 insertions(+)

diff --git a/src/Spec-Toplo/SpToploAbstractTextAdapter.class.st b/src/Spec-Toplo/SpToploAbstractTextAdapter.class.st
index 2ea5b1f..aa03733 100644
--- a/src/Spec-Toplo/SpToploAbstractTextAdapter.class.st
+++ b/src/Spec-Toplo/SpToploAbstractTextAdapter.class.st
@@ -64,6 +64,12 @@ SpToploAbstractTextAdapter >> subscribeToPresenter [
 		whenEditableChangedDo: [ self updateEditable ]
 ]
 
+{ #category : #accessing }
+SpToploAbstractTextAdapter >> text: aString [ 
+	
+	widget text: aString asRopedText
+]
+
 { #category : #simulating }
 SpToploAbstractTextAdapter >> typeByChar: aString [