Mercurial Mercurial > hg > stx-libview2 / changeset
summary | shortlog | changelog | graph | tags | bookmarks | branches | files | changeset | raw | zip | gz | bz2 | help
Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
return app in class>>open
authorClaus Gittinger <cg@exept.de>
Fri, 03 May 1996 13:46:53 +0200
changeset 240 09028fa9ff5f
parent 239 208108f3c707
child 241 30383e124f8c
return app in class>>open
AppModel.st file | annotate | diff | comparison | revisions
ApplicationModel.st file | annotate | diff | comparison | revisions 
--- a/AppModel.st	Thu May 02 17:54:50 1996 +0200
+++ b/AppModel.st	Fri May 03 13:46:53 1996 +0200
@@ -190,11 +190,13 @@
 open
     "create an instance of the application and open its view"
 
-    self new open
+    ^ self new open
 
     "
      self open
     "
+
+    "Modified: 3.5.1996 / 13:39:21 / cg"
 !
 
 openInterface:anInterfaceSymbol
@@ -469,7 +471,9 @@
 open
     "open a standard interface"
 
-    self openInterface
+    ^ self openInterface
+
+    "Modified: 3.5.1996 / 13:39:15 / cg"
 !
 
 openInterface
@@ -571,6 +575,6 @@
 !ApplicationModel class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libview2/Attic/AppModel.st,v 1.23 1996-04-25 16:31:42 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libview2/Attic/AppModel.st,v 1.24 1996-05-03 11:46:53 cg Exp $'
 ! !
 ApplicationModel initialize!
--- a/ApplicationModel.st	Thu May 02 17:54:50 1996 +0200
+++ b/ApplicationModel.st	Fri May 03 13:46:53 1996 +0200
@@ -190,11 +190,13 @@
 open
     "create an instance of the application and open its view"
 
-    self new open
+    ^ self new open
 
     "
      self open
     "
+
+    "Modified: 3.5.1996 / 13:39:21 / cg"
 !
 
 openInterface:anInterfaceSymbol
@@ -469,7 +471,9 @@
 open
     "open a standard interface"
 
-    self openInterface
+    ^ self openInterface
+
+    "Modified: 3.5.1996 / 13:39:15 / cg"
 !
 
 openInterface
@@ -571,6 +575,6 @@
 !ApplicationModel class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libview2/ApplicationModel.st,v 1.23 1996-04-25 16:31:42 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libview2/ApplicationModel.st,v 1.24 1996-05-03 11:46:53 cg Exp $'
 ! !
 ApplicationModel initialize!
hg/stx-libview2