Tools__NavigationState.st
branchjv
changeset 12301 d9f03189bb66
parent 12296 6921627a8c27
child 12302 a6409fe150ce
--- a/Tools__NavigationState.st	Sat Oct 06 22:48:32 2012 +0100
+++ b/Tools__NavigationState.st	Mon Oct 22 17:18:07 2012 +0100
@@ -37,7 +37,7 @@
 		codePaneAndPluginViewRelativeCorners pluginVisibleHolder
 		bookmarkHolder worker packageInfoBackgroundColorHolder
 		packageInfoButton showMethodTemplate lastMethodShownInCodeView'
-	classVariableNames:''
+	classVariableNames:'CodeAspectTranslations'
 	poolDictionaries:''
 	category:'Interface-Browsers-New'
 !
@@ -58,6 +58,21 @@
 "
 ! !
 
+!NavigationState class methodsFor:'initialization'!
+
+initialize
+    "Invoked at system start or when the class is dynamically loaded."
+
+    "/ please change as required (and remove this comment)
+
+    CodeAspectTranslations := Dictionary new.
+    CodeAspectTranslations at: #newApplication put: SyntaxHighlighter codeAspectClassDefinition.
+
+    "/ Add more...
+
+    "Modified (format): / 22-10-2012 / 17:07:42 / Jan Vrany <jan.vrany@fit.cvut.cz>"
+! !
+
 !NavigationState methodsFor:'accessing'!
 
 autoSearchAction
@@ -145,11 +160,14 @@
 
     codeAspect := aSymbolOrNil.
     (codeView notNil and:[codeView isCodeView2]) ifTrue:[
-        codeView codeAspect: aSymbolOrNil
+        | xlatedCodeAspect |
+
+        xlatedCodeAspect := CodeAspectTranslations at: aSymbolOrNil ifAbsent: aSymbolOrNil.
+        codeView codeAspect: xlatedCodeAspect
     ].
 
     "Created: / 11-02-2000 / 12:43:45 / cg"
-    "Modified: / 28-02-2012 / 11:06:08 / Jan Vrany <jan.vrany@fit.cvut.cz>"
+    "Modified: / 22-10-2012 / 17:05:30 / Jan Vrany <jan.vrany@fit.cvut.cz>"
 !
 
 codePaneAndPluginView
@@ -1673,5 +1691,7 @@
 !
 
 version_SVN
-    ^ '$Id: Tools__NavigationState.st 8059 2012-09-27 20:08:20Z vranyj1 $'
+    ^ '$Id: Tools__NavigationState.st 8065 2012-10-22 16:18:07Z vranyj1 $'
 ! !
+
+NavigationState initialize!