--- a/SimpleDialog.st Thu Jun 06 12:07:43 2013 +0200
+++ b/SimpleDialog.st Fri Jun 07 01:14:48 2013 +0200
@@ -443,6 +443,18 @@
"Modified: / 20.5.1998 / 20:21:28 / cg"
!
+openInterface:aSymbol at:position
+ "open a standard interface.
+ Redefined to return the accept value instead of the builder."
+
+ super openInterfaceModal:aSymbol at:position.
+ acceptedValue notNil ifTrue:[^ acceptedValue].
+ ^ accept value.
+
+ "Created: / 23.1.1998 / 18:19:57 / cg"
+ "Modified: / 20.5.1998 / 20:21:28 / cg"
+!
+
openSpec:aWindowSpec
"open a window spec.
Redefned to open modal and to return the accept value instead
@@ -545,6 +557,6 @@
!SimpleDialog class methodsFor:'documentation'!
version_CVS
- ^ '$Header: /cvs/stx/stx/libview2/SimpleDialog.st,v 1.49 2013-03-07 13:25:55 cg Exp $'
+ ^ '$Header: /cvs/stx/stx/libview2/SimpleDialog.st,v 1.50 2013-06-06 23:14:48 cg Exp $'
! !