UX: expand top-level variable in variable list if this is the only variable
authorJan Vrany <jan.vrany@fit.cvut.cz>
Fri, 25 May 2018 11:14:20 +0100
changeset 74 1a238ee98ed3
parent 73 82e202dec6cb
child 75 05177610d04d
UX: expand top-level variable in variable list if this is the only variable ...which is the common case when opening an inspector on an object.
VDBVariableObjectListApplication.st
--- a/VDBVariableObjectListApplication.st	Tue Apr 10 20:23:08 2018 +0100
+++ b/VDBVariableObjectListApplication.st	Fri May 25 11:14:20 2018 +0100
@@ -249,12 +249,15 @@
                         yourself
                 ]).
     root expand.
+    root children size == 1 ifTrue:[ 
+        root children first expand
+    ].
     internalListView notNil ifTrue:[
         internalListView invalidate.
     ]
 
     "Created: / 27-02-2015 / 15:47:18 / Jan Vrany <jan.vrany@fit.cvut.cz>"
-    "Modified: / 03-02-2018 / 07:31:34 / Jan Vrany <jan.vrany@fit.cvut.cz>"
+    "Modified: / 25-05-2018 / 10:40:08 / Jan Vrany <jan.vrany@fit.cvut.cz>"
 !
 
 delayedUpdateSelection