--- a/EnterFieldGroup.st	Thu Dec 14 21:18:44 1995 +0100
+++ b/EnterFieldGroup.st	Fri Dec 15 14:04:06 1995 +0100
@@ -425,28 +425,28 @@
 !
 
 handlesButtonPress:button inView:aView
-    "query from event processor: am I interrested in button-events ?
+    "query from event processor: am I interested in button-events ?
      yes I am (to activate the clicked-on field)."
 
    ^ true
 !
 
 handlesButtonShiftPress:button inView:aView
-    "query from event processor: am I interrested in button-events ?
+    "query from event processor: am I interested in button-events ?
      yes I am (to activate the clicked-on field)."
 
     ^ true
 !
 
 handlesKeyPress:key inView:aView
-    "query from event processor: am I interrested in key-events ?
+    "query from event processor: am I interested in key-events ?
      yes I am (to forward it to the active field)."
 
     ^ true
 !
 
 handlesKeyRelease:key inView:aView
-    "query from event processor: am I interrested in key-events ?
+    "query from event processor: am I interested in key-events ?
      yes I am (to forward it to the active field)."
 
     ^ true
@@ -501,5 +501,5 @@
 !EnterFieldGroup class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libwidg/EnterFieldGroup.st,v 1.15 1995-11-23 17:45:50 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libwidg/EnterFieldGroup.st,v 1.16 1995-12-15 13:04:00 cg Exp $'
 ! !