# HG changeset patch
# User Claus Gittinger <cg@exept.de>
# Date 1393327812 -3600
# Node ID cc05bf8ba3a739ec79b1d9a37eadc33f8df8a90e
# Parent  02c5bb5ce4eee2d18fe4b2fcfa6ad757b451e839
class: UIPainter
changed: #raiseTabView
fix for subAspect list gathering when application is
in a namespace (did not find class of majorKey then)

diff -r 02c5bb5ce4ee -r cc05bf8ba3a7 UIPainter.st
--- a/UIPainter.st	Tue Feb 25 12:06:00 2014 +0100
+++ b/UIPainter.st	Tue Feb 25 12:30:12 2014 +0100
@@ -4017,7 +4017,15 @@
     ifFalse:[self isHelpToolSelected   ifTrue:[tool := helpTool   ]
     ifFalse:[
         tool := specTool.
-        tool notNil ifTrue:[ specTool selection:tabSelection ].
+        tool notNil ifTrue:[ 
+            "/ the spectool needs to know, in which nameSpace the application class is located, to find out
+            "/ how to resolve short majorKeys...
+            UISpecification uiMajorKeyBindingNameSpaceQuery 
+                answer:(specClass notNil ifTrue:[specClass nameSpace] ifFalse:Smalltalk)
+                do:[
+                    specTool selection:tabSelection 
+                ].
+        ].
     ]].
 
     (Array with:helpTool with:layoutTool with:specTool) do:[:aTool|