--- a/EditField.st Tue Jun 27 04:24:41 1995 +0200
+++ b/EditField.st Mon Jul 03 04:34:22 1995 +0200
@@ -27,7 +27,7 @@
COPYRIGHT (c) 1990 by Claus Gittinger
All Rights Reserved
-$Header: /cvs/stx/stx/libwidg/EditField.st,v 1.25 1995-06-27 02:22:47 claus Exp $
+$Header: /cvs/stx/stx/libwidg/EditField.st,v 1.26 1995-07-03 02:32:46 claus Exp $
'!
!EditField class methodsFor:'documentation'!
@@ -48,7 +48,7 @@
version
"
-$Header: /cvs/stx/stx/libwidg/EditField.st,v 1.25 1995-06-27 02:22:47 claus Exp $
+$Header: /cvs/stx/stx/libwidg/EditField.st,v 1.26 1995-07-03 02:32:46 claus Exp $
"
!
@@ -923,6 +923,8 @@
"if keyHandler is defined, pass input; otherwise check for leave
keys"
+ <resource: #keyboard (#DeleteLine #EndOfText)>
+
|leave xCol newOffset oldWidth newWidth|
enabled ifFalse:[