--- a/SimpleDialog.st	Fri Feb 28 22:51:30 1997 +0100
+++ b/SimpleDialog.st	Fri Feb 28 22:51:50 1997 +0100
@@ -187,10 +187,14 @@
 !
 
 openFrom:anInterfaceSpec
+    "open the dialog from a given spec;
+     return true if accepted, false if canceled"
+
     self allButOpenFrom:anInterfaceSpec.
     self openDialog.
     ^ accept value
 
+    "Modified: 28.2.1997 / 16:40:36 / cg"
 !
 
 preOpen
@@ -212,5 +216,5 @@
 !SimpleDialog class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libview2/SimpleDialog.st,v 1.6 1997-02-28 21:51:30 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libview2/SimpleDialog.st,v 1.7 1997-02-28 21:51:50 cg Exp $'
 ! !