#DOCUMENTATION by cg
authorClaus Gittinger <cg@exept.de>
Wed, 12 Oct 2016 09:04:34 +0200
changeset 3341 2089a2debb66
parent 3340 c3f16b9e2999
child 3342 1d1d2904c353
#DOCUMENTATION by cg class: Tools::ViewTreeInspectorApplication changed: #installInLauncher
Tools__ViewTreeApplication.st
--- a/Tools__ViewTreeApplication.st	Mon Oct 10 09:32:32 2016 +0200
+++ b/Tools__ViewTreeApplication.st	Wed Oct 12 09:04:34 2016 +0200
@@ -1,5 +1,3 @@
-"{ Encoding: utf8 }"
-
 "
  COPYRIGHT (c) 2007 by eXept Software AG
               All Rights Reserved
@@ -115,24 +113,24 @@
     "/ cg - disabled. the icon is too ugly.
     ^ self.
 
-    icon := ToolbarIconLibrary inspectLocals20x20Icon magnifiedTo:28@28.
-
-    menuItem := MenuItem new 
-                    label: 'View Tree Inspector';
-                    value: [ ViewTreeInspectorApplication open];
-                    isButton: true;
-                    icon: icon;
-                    nameKey: #viewInspect.
-
-    menuItem startGroup:#right.
-    NewLauncher addMenuItem:menuItem in:'toolbar'
-                   position:#( #before #help)
-                      space:false.
-
-"
-self installInLauncher
-self removeFromLauncher
-"
+"/    icon := ToolbarIconLibrary inspectLocals20x20Icon magnifiedTo:28@28.
+"/
+"/    menuItem := MenuItem new 
+"/                    label: 'View Tree Inspector';
+"/                    value: [ ViewTreeInspectorApplication open];
+"/                    isButton: true;
+"/                    icon: icon;
+"/                    nameKey: #viewInspect.
+"/
+"/    menuItem startGroup:#right.
+"/    NewLauncher addMenuItem:menuItem in:'toolbar'
+"/                   position:#( #before #help)
+"/                      space:false.
+
+    "
+     self installInLauncher
+     self removeFromLauncher
+    "
 !
 
 postAutoload