--- a/EditField.st	Wed Jun 09 19:04:27 2004 +0200
+++ b/EditField.st	Wed Jun 09 19:04:54 2004 +0200
@@ -999,15 +999,15 @@
     ^ entryCompletionBlock value
 !
 
-entryCompletionBlock:aOneYwoOrThreeArgBlock
+entryCompletionBlock:aZeroOneOrTwoArgBlock
     "define an action to be evaluated when Tab (EntryCompletionCharacter) is pressed.
      The block gets the current contents and the field itself as optional arguments
      (i.e. it can be a 0, 1 or 2-arg block)."
 
-    entryCompletionBlock := aOneYwoOrThreeArgBlock
+    entryCompletionBlock := aZeroOneOrTwoArgBlock
 !
 
-entryCompletionBlockHolder:aOneYwoOrThreeArgBlockHolder
+entryCompletionBlockHolder:aZeroOneOrTwoArgBlock
     "a holder for an action to be evaluated when Tab (EntryCompletionCharacter) is pressed.
      The block gets the current contents and the field itself as optional arguments
      (i.e. it can be a 0, 1 or 2-arg block)."
@@ -1015,7 +1015,7 @@
     "/ for now (to avoid incompatibilities), misuse the existing
     "/ entryCompletionBlock and check if its a holder.
 
-    entryCompletionBlock := aOneYwoOrThreeArgBlockHolder
+    entryCompletionBlock := aZeroOneOrTwoArgBlock
 !
 
 immediateAccept:aBoolean
@@ -2156,5 +2156,5 @@
 !EditField class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libwidg/EditField.st,v 1.173 2004-06-09 17:04:27 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libwidg/EditField.st,v 1.174 2004-06-09 17:04:54 cg Exp $'
 ! !