# HG changeset patch
# User Claus Gittinger <cg@exept.de>
# Date 1563201605 -7200
# Node ID 5cf6c9bdb07c0bd9b9feff53910194e071bc90a6
# Parent  ba8fdce255048d209da564fcf036f5f4c6353079
#DOCUMENTATION by cg
class: EnterBox
comment/format in:
	#title:
	#title:okText:
	#title:okText:abortText:

diff -r ba8fdce25504 -r 5cf6c9bdb07c EnterBox.st
--- a/EnterBox.st	Mon Jul 15 15:35:49 2019 +0200
+++ b/EnterBox.st	Mon Jul 15 16:40:05 2019 +0200
@@ -434,7 +434,8 @@
 !
 
 title:aString
-    "set the title to be displayed at top of the enterBox"
+    "set the title to be displayed at top of the enterBox.
+     This is NOT the window title."
 
     |oldSize|
 
@@ -452,11 +453,12 @@
         ]
     ]
 
-    "Modified (comment): / 26-08-2018 / 18:10:08 / Claus Gittinger"
+    "Modified (comment): / 15-07-2019 / 16:34:02 / Claus Gittinger"
 !
 
 title:titleString okText:okString
-    "set title and text in okbutton"
+    "set title and text in okbutton.
+     This title is NOT the window title."
 
     (titleString ~= labelField label or:[okString ~= okButton label]) ifTrue:[
         okButton label:okString.
@@ -467,10 +469,13 @@
             ifTrue:[self resize]
             ifFalse:[ self sizeChanged:nil].
     ]
+
+    "Modified (comment): / 15-07-2019 / 16:34:12 / Claus Gittinger"
 !
 
 title:titleString okText:okString abortText:abortString
-    "set title and texts in the buttons"
+    "set title and texts in the buttons.
+     This title is NOT the window title."
 
     (titleString ~= labelField label
      or:[okString ~= okButton label
@@ -485,6 +490,8 @@
             ifTrue:[self resize]
             ifFalse:[ self sizeChanged:nil].
     ]
+
+    "Modified (comment): / 15-07-2019 / 16:34:17 / Claus Gittinger"
 ! !
 
 !EnterBox methodsFor:'change & update'!