--- a/AppModel.st	Mon Feb 17 19:42:31 1997 +0100
+++ b/AppModel.st	Mon Feb 17 19:50:14 1997 +0100
@@ -957,7 +957,7 @@
     "open the window - assumes that the builder has already setup
      the interface."
 
-    builder openDialog.
+    ^ builder openDialog.
 
     "Modified: 14.2.1997 / 20:32:52 / cg"
 !
@@ -965,7 +965,7 @@
 openDialogInterface:aSelector
     "open a dialog"
 
-    SimpleDialog new openFor:self interface:aSelector
+    ^ SimpleDialog new openFor:self interface:aSelector
 !
 
 openWindow
@@ -1237,6 +1237,6 @@
 !ApplicationModel class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libview2/Attic/AppModel.st,v 1.39 1997-02-14 20:34:38 ca Exp $'
+    ^ '$Header: /cvs/stx/stx/libview2/Attic/AppModel.st,v 1.40 1997-02-17 18:50:14 ca Exp $'
 ! !
 ApplicationModel initialize!

--- a/ApplicationModel.st	Mon Feb 17 19:42:31 1997 +0100
+++ b/ApplicationModel.st	Mon Feb 17 19:50:14 1997 +0100
@@ -957,7 +957,7 @@
     "open the window - assumes that the builder has already setup
      the interface."
 
-    builder openDialog.
+    ^ builder openDialog.
 
     "Modified: 14.2.1997 / 20:32:52 / cg"
 !
@@ -965,7 +965,7 @@
 openDialogInterface:aSelector
     "open a dialog"
 
-    SimpleDialog new openFor:self interface:aSelector
+    ^ SimpleDialog new openFor:self interface:aSelector
 !
 
 openWindow
@@ -1237,6 +1237,6 @@
 !ApplicationModel class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libview2/ApplicationModel.st,v 1.39 1997-02-14 20:34:38 ca Exp $'
+    ^ '$Header: /cvs/stx/stx/libview2/ApplicationModel.st,v 1.40 1997-02-17 18:50:14 ca Exp $'
 ! !
 ApplicationModel initialize!