--- a/EnterBox2.st	Mon Feb 23 15:57:38 2009 +0100
+++ b/EnterBox2.st	Mon Feb 23 16:00:07 2009 +0100
@@ -9,7 +9,6 @@
  other person.  No title to or ownership of the software is
  hereby transferred.
 "
-
 "{ Package: 'stx:libwidg' }"
 
 EnterBox subclass:#EnterBox2
@@ -114,6 +113,7 @@
      add a second ok-button (a return button)
     "
     okButton2 := Button okButton.
+    okButton2 name: 'okButton2'.
     Dialog defaultOKButtonAtLeft ifTrue:[
         buttonPanel addSubView:okButton2 before:okButton.
     ] ifFalse:[
@@ -156,5 +156,5 @@
 !EnterBox2 class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libwidg/EnterBox2.st,v 1.25 2003-03-02 18:46:52 stefan Exp $'
+    ^ '$Header: /cvs/stx/stx/libwidg/EnterBox2.st,v 1.26 2009-02-23 15:00:07 fm Exp $'
 ! !