ApplicationModel.st
branchjv
changeset 3817 e15b5eca8c7a
parent 3801 aa01aaf6085c
parent 3811 8b644e261e17
child 3856 47878d05e8e8
--- a/ApplicationModel.st	Thu Dec 29 00:19:20 2016 +0000
+++ b/ApplicationModel.st	Thu Jan 05 21:05:26 2017 +0000
@@ -874,7 +874,7 @@
     "return true, if this application can be started via #open.
      (to allow start of a change browser via double-click in the browser)"
 
-    (self isAbstract) ifTrue:[^ false "I am abstract"].
+    self isAbstract ifTrue:[^ false].
     ((self respondsTo:#open) or:[self class includesSelector:#openInterface]) ifFalse:[^ false].
 "/    (self respondsTo:#windowSpec) ifFalse:[^ false].
     ^ true
@@ -1802,9 +1802,9 @@
      interfaceSpecifications from a Dictionary or whatever.
      Typically, an interfaceSpecification is returned there."
 
-    ^ ApplicationModel
-	specificationFor:aKey
-	application:self
+    ^ self class
+        specificationFor:aKey
+        application:self
 	onDevice:(device)
 !