--- a/Tools__Inspector2.st	Tue Apr 15 11:29:12 2014 +0200
+++ b/Tools__Inspector2.st	Tue Apr 15 11:29:38 2014 +0200
@@ -837,18 +837,9 @@
 evaluationLanguageHolder
     <resource: #uiAspect>
 
-    "automatically generated by UIPainter ..."
-
-    "*** the code below creates a default model when invoked."
-    "*** (which may not be the one you wanted)"
-    "*** Please change as required and accept it in the browser."
-    "*** (and replace this comment by something more useful ;-)"
-
     evaluationLanguageHolder isNil ifTrue:[
         evaluationLanguageHolder := ValueHolder new.
-"/ if your app needs to be notified of changes, uncomment one of the lines below:
        evaluationLanguageHolder addDependent:self.
-"/       evaluationLanguageHolder onChangeSend:#evaluationLanguageHolderChanged to:self.
     ].
     ^ evaluationLanguageHolder.
 
@@ -858,18 +849,8 @@
 evaluationLanguageList
     <resource: #uiAspect>
 
-    "automatically generated by UIPainter ..."
-
-    "*** the code below creates a default model when invoked."
-    "*** (which may not be the one you wanted)"
-    "*** Please change as required and accept it in the browser."
-    "*** (and replace this comment by something more useful ;-)"
-
     evaluationLanguageList isNil ifTrue:[
         evaluationLanguageList := ValueHolder new.
-"/ if your app needs to be notified of changes, uncomment one of the lines below:
-"/       evaluationLanguageList addDependent:self.
-"/       evaluationLanguageList onChangeSend:#evaluationLanguageListChanged to:self.
     ].
     ^ evaluationLanguageList.
 !
@@ -1194,19 +1175,6 @@
     "Created: / 11-07-2011 / 22:33:47 / cg"
 !
 
-historyTryPush: anObject
-    <resource: #obsolete>
-
-  "/ Pokud uz na anObject byl tak tam skocit, jinak pridat na konec
-  self history do: [:item |
-    item theObject == anObject ifTrue:[ ^item ]
-  ].
-
-  ^ self history push:anObject.
-
-    "Modified: / 16-01-2008 / 14:25:30 / janfrog"
-!
-
 inspect:anObject 
     | objectsLanguage |
 
@@ -1281,7 +1249,6 @@
     "Created: / 26-10-2013 / 01:13:15 / Jan Vrany <jan.vrany@fit.cvut.cz>"
 ! !
 
-
 !Inspector2::NavigationState class methodsFor:'creating classes'!
 
 for:anObject 
@@ -1297,11 +1264,11 @@
 !Inspector2::NavigationState class methodsFor:'documentation'!
 
 version
-    ^'$Header: /cvs/stx/stx/libtool/Tools__Inspector2.st,v 1.49 2014-04-13 19:01:54 vrany Exp $'
+    ^'$Header: /cvs/stx/stx/libtool/Tools__Inspector2.st,v 1.50 2014-04-15 09:29:38 stefan Exp $'
 !
 
 version_SVN
-    ^'$Id: Tools__Inspector2.st,v 1.49 2014-04-13 19:01:54 vrany Exp $'
+    ^'$Id: Tools__Inspector2.st,v 1.50 2014-04-15 09:29:38 stefan Exp $'
 ! !
 
 !Inspector2::NavigationState methodsFor:'accessing'!
@@ -1557,19 +1524,19 @@
 !Inspector2 class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libtool/Tools__Inspector2.st,v 1.49 2014-04-13 19:01:54 vrany Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/Tools__Inspector2.st,v 1.50 2014-04-15 09:29:38 stefan Exp $'
 !
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libtool/Tools__Inspector2.st,v 1.49 2014-04-13 19:01:54 vrany Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/Tools__Inspector2.st,v 1.50 2014-04-15 09:29:38 stefan Exp $'
 !
 
 version_CVS_jvrany
-    ^ '$Header: /cvs/stx/stx/libtool/Tools__Inspector2.st,v 1.49 2014-04-13 19:01:54 vrany Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/Tools__Inspector2.st,v 1.50 2014-04-15 09:29:38 stefan Exp $'
 !
 
 version_SVN
-    ^ '$Id: Tools__Inspector2.st,v 1.49 2014-04-13 19:01:54 vrany Exp $'
+    ^ '$Id: Tools__Inspector2.st,v 1.50 2014-04-15 09:29:38 stefan Exp $'
 ! !