--- a/EnterFieldGroup.st	Wed Jan 27 16:56:11 2016 +0100
+++ b/EnterFieldGroup.st	Wed Jan 27 16:56:13 2016 +0100
@@ -11,6 +11,8 @@
 "
 "{ Package: 'stx:libwidg' }"
 
+"{ NameSpace: Smalltalk }"
+
 Object subclass:#EnterFieldGroup
 	instanceVariableNames:'fields currentField leaveAction wrap leaveOnTabLast'
 	classVariableNames:''
@@ -44,7 +46,7 @@
     This is done by arranging for all of my fields to delegate their
     input to me, which is then forwarded to the active field).
 
-    The block accessable as leaveAction is evaluated when the last
+    The block accessible as leaveAction is evaluated when the last
     field of the group is left (by cursor-down or cr). 
     Usually this block triggers accept on the fields (if they did not already)
     and/or performs some followup processing and possibly closes the topview 
@@ -800,10 +802,10 @@
 !EnterFieldGroup class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libwidg/EnterFieldGroup.st,v 1.43 2014-06-13 21:06:48 cg Exp $'
+    ^ '$Header$'
 !
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libwidg/EnterFieldGroup.st,v 1.43 2014-06-13 21:06:48 cg Exp $'
+    ^ '$Header$'
 ! !