--- a/EnterFieldGroup.st	Sat May 18 16:25:16 1996 +0200
+++ b/EnterFieldGroup.st	Sat May 18 17:42:59 1996 +0200
@@ -344,9 +344,9 @@
         top delegate:group.
         top openModal.
 
-        Transcript showCr:'value1: ' , value1.
-        Transcript showCr:'value2: ' , value2.
-        Transcript showCr:'value3: ' , value3.
+        Transcript showCR:'value1: ' , value1.
+        Transcript showCR:'value2: ' , value2.
+        Transcript showCR:'value3: ' , value3.
                                                                         [exEnd]
 
 
@@ -380,9 +380,9 @@
 
         box open.
 
-        Transcript showCr:'value1: ' , value1.
-        Transcript showCr:'value2: ' , value2.
-        Transcript showCr:'value3: ' , value3.
+        Transcript showCR:'value1: ' , value1.
+        Transcript showCR:'value2: ' , value2.
+        Transcript showCR:'value3: ' , value3.
                                                                         [exEnd]
 
     Here, the fields use different models, but the same aspect:
@@ -407,9 +407,9 @@
 
         box open.
 
-        Transcript showCr:'value1: ' , valueHolder1 value.
-        Transcript showCr:'value2: ' , valueHolder2 value.
-        Transcript showCr:'value3: ' , valueHolder3 value.
+        Transcript showCR:'value1: ' , valueHolder1 value.
+        Transcript showCR:'value2: ' , valueHolder2 value.
+        Transcript showCR:'value3: ' , valueHolder3 value.
                                                                         [exEnd]
 "
 
@@ -680,5 +680,5 @@
 !EnterFieldGroup class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libwidg/EnterFieldGroup.st,v 1.23 1996-04-30 07:40:01 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libwidg/EnterFieldGroup.st,v 1.24 1996-05-18 15:39:03 cg Exp $'
 ! !