renamed #addLabelledInputField... method
authorClaus Gittinger <cg@exept.de>
Sat, 13 Apr 1996 13:42:01 +0200
changeset 535 84282b53f2a7
parent 534 26871bcd9473
child 536 fd1b723e69b6
renamed #addLabelledInputField... method
DialogBox.st
--- a/DialogBox.st	Sat Apr 13 13:40:12 1996 +0200
+++ b/DialogBox.st	Sat Apr 13 13:42:01 1996 +0200
@@ -2719,7 +2719,7 @@
     "Modified: 9.2.1996 / 21:36:16 / cg"
 !
 
-addLabelledInputField:labelString adjust:labelAdjust on:model tabable:tabable x:relativeX
+addLabelledInputField:labelString adjust:labelAdjust on:model tabable:tabable separateAtX:relativeX
     "add a label and an inputField side-by-side.
      The labels goes from 0.0 to relativeX; the inputField from relativeX to 1.0.
      The labels string is defined by labelString and adjusted according to labelAdjust.
@@ -2748,7 +2748,7 @@
                 adjust:#left 
                 on:model 
                 tabable:true 
-                x:0.3.
+                separateAtX:0.3.
 
      dialog addAbortButton; addOkButton.
      dialog open.
@@ -2771,14 +2771,14 @@
                 adjust:#right 
                 on:model1 
                 tabable:true 
-                x:0.4.
+                separateAtX:0.4.
 
      field := dialog 
                 addLabelledInputField:'string2:' 
                 adjust:#right 
                 on:model2 
                 tabable:true 
-                x:0.4.
+                separateAtX:0.4.
 
      dialog addAbortButton; addOkButton.
      dialog open.
@@ -2788,8 +2788,7 @@
      ].
     "
 
-    "Created: 13.4.1996 / 13:36:39 / cg"
-    "Modified: 13.4.1996 / 13:38:37 / cg"
+    "Created: 13.4.1996 / 13:41:31 / cg"
 !
 
 addListBoxOn:aModel
@@ -3882,6 +3881,6 @@
 !DialogBox class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libwidg/DialogBox.st,v 1.56 1996-04-13 11:40:12 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libwidg/DialogBox.st,v 1.57 1996-04-13 11:42:01 cg Exp $'
 ! !
 DialogBox initialize!