From 42fe9b45e088e804305951abfd0bbf60cfcb04fc Mon Sep 17 00:00:00 2001
From: =?UTF-8?q?Mathieu=20Magu=C3=A9r=C3=A8s?=
 <mathieu.magueres@fr.thalesgroup.com>
Date: Thu, 2 Apr 2026 17:48:30 +0200
Subject: [PATCH] add placeholder to stash

---
 .../ToTextField.extension.st                      | 13 +++++++++++++
 .../ToSerializerTest.class.st                     | 15 +++++++++++++++
 2 files changed, 28 insertions(+)
 create mode 100644 src/Toplo-Serialization-Stash/ToTextField.extension.st

diff --git a/src/Toplo-Serialization-Stash/ToTextField.extension.st b/src/Toplo-Serialization-Stash/ToTextField.extension.st
new file mode 100644
index 0000000..b94d944
--- /dev/null
+++ b/src/Toplo-Serialization-Stash/ToTextField.extension.st
@@ -0,0 +1,13 @@
+Extension { #name : #ToTextField }
+
+{ #category : #'*Toplo-Serialization-Stash' }
+ToTextField >> stashPlaceholder [
+
+	<stashAccessors>
+	self userData at: #placeholder ifAbsent: [ ^ {  } ].
+	^ { ([ :e |
+		   ' placeholderText: '''
+		   , (BlTextNonPrintableCharacterPrinter print:
+				    (self userData at: #placeholder) children first children first
+					    text) , ''''] -> self) onlySetOnStash }
+]
diff --git a/src/Toplo-Serialization-Tests/ToSerializerTest.class.st b/src/Toplo-Serialization-Tests/ToSerializerTest.class.st
index 4c72ac2..6e27d3c 100644
--- a/src/Toplo-Serialization-Tests/ToSerializerTest.class.st
+++ b/src/Toplo-Serialization-Tests/ToSerializerTest.class.st
@@ -143,6 +143,21 @@ ToSerializerTest >> testLocalTheme2 [
 		self assert: element localTheme class equals: ToBeeDarkTheme ]
 ]
 
+{ #category : #tests }
+ToSerializerTest >> testPlaceHolder [
+
+	| origin textElement|
+	origin := ToTextField new
+	 placeholderText: 'Enter text...'.
+
+	
+	
+	self
+		test: origin
+		on: [ :element | textElement := (((element userData at:#placeholder) children first) children first).
+			 self assert: (BlTextNonPrintableCharacterPrinter print:textElement text) equals: 'Enter text...' ]
+]
+
 { #category : #tests }
 ToSerializerTest >> testStamps [