ContextInspectorView.st
changeset 3200 4889a13402db
parent 3105 9d80b49560ca
child 3425 63909439cbe8
--- a/ContextInspectorView.st	Tue Sep 25 14:57:48 2001 +0200
+++ b/ContextInspectorView.st	Tue Sep 25 15:02:35 2001 +0200
@@ -389,35 +389,35 @@
 
     showingTemporaries ifFalse:[
         items := #(
-                        ('inspect'          #doInspect)
-                        ('basicInspect'     #doBasicInspect)
+                        ('Inspect'          #doInspect)
+                        ('BasicInspect'     #doBasicInspect)
                         ('-')
-                        ('browse'               #browse)
-                        ('browse blocks home'   #browseHome)
+                        ('Browse'               #browse)
+                        ('Browse blocks home'   #browseHome)
                         ('-')
-                        ('show temporaries' #showTemporaries)
+                        ('Show temporaries' #showTemporaries)
                   )
     ] ifTrue:[
         items := #(
-                        ('inspect'          #doInspect)
-                        ('basicInspect'     #doBasicInspect)
+                        ('Inspect'          #doInspect)
+                        ('BasicInspect'     #doBasicInspect)
                         ('-')
-                        ('browse'               #browse)
-                        ('browse blocks home'   #browseHome)
+                        ('Browse'               #browse)
+                        ('Browse blocks home'   #browseHome)
                         ('-')
-                        ('hide temporaries' #hideTemporaries)
+                        ('Hide temporaries' #hideTemporaries)
                   )
     ].
 
     showHex ifTrue:[
         items := items , #(
                         ('-')
-                        ('decimal integers'  #toggleHex               )
+                        ('Decimal integers'  #toggleHex               )
                           )
     ] ifFalse:[
         items := items , #(
                         ('-')
-                        ('hex integers'      #toggleHex               )
+                        ('Hex integers'      #toggleHex               )
                           )
     ].
     m := PopUpMenu
@@ -555,5 +555,5 @@
 !ContextInspectorView class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libtool/ContextInspectorView.st,v 1.50 2001-09-04 18:48:59 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/ContextInspectorView.st,v 1.51 2001-09-25 13:02:31 cg Exp $'
 ! !