EnterBox.st
changeset 113 fdd18cfff57e
parent 110 eb59f6e31e84
child 118 3ee5ea99d0e2
--- a/EnterBox.st	Sun Mar 26 22:16:09 1995 +0200
+++ b/EnterBox.st	Fri Mar 31 05:04:16 1995 +0200
@@ -37,7 +37,7 @@
 
 version
 "
-$Header: /cvs/stx/stx/libwidg/EnterBox.st,v 1.19 1995-03-25 22:20:02 claus Exp $
+$Header: /cvs/stx/stx/libwidg/EnterBox.st,v 1.20 1995-03-31 03:01:43 claus Exp $
 "
 !
 
@@ -293,7 +293,7 @@
     "
      forward keyboard input to the enterfield
     "
-    self keyboardHandler:enterField
+    self delegate:(KeyboardForwarder to:enterField)
 !
 
 reAdjustGeometry