BrowserView.st
changeset 809 f333068dc7cf
parent 805 02ab612cc30d
child 810 46e587b6e439
--- a/BrowserView.st	Sat Oct 26 13:15:41 1996 +0200
+++ b/BrowserView.st	Sat Oct 26 15:26:42 1996 +0200
@@ -597,6 +597,8 @@
 
     currentClassCategory isNil ifTrue:[
         labels := #(
+"/                    'namespace ...'
+"/                    '-'
                     'clone'
                     'open for class ...'
                     'spawn full class'
@@ -610,6 +612,8 @@
                     'others ...'
                    ).
         selectors := #(
+"/                    namespaceDialog    
+"/                    nil
                     classCategoryClone
                     classCategoryOpenInClass
                     classCategorySpawnFullClass
@@ -623,6 +627,8 @@
                     otherMenu
                    ).
         shorties := #(
+"/                    nil
+"/                    nil
                     nil
                     nil
                     nil
@@ -641,6 +647,8 @@
                     'printOut' 
                     'printOut protocol'
                     '-'
+"/                    'namespace ...'
+"/                    '-'
                     'clone'
                     'open for class ...'
                     'SPAWN_CATEGORY'
@@ -654,7 +662,7 @@
                     'rename ...'
                     'remove'
                     '='
-                    'others ...'
+                    'others'
                    ).
         selectors := #(
                    classCategoryFileOut
@@ -662,6 +670,8 @@
                    classCategoryPrintOut
                    classCategoryPrintOutProtocol
                    nil
+"/                   namespaceDialog    
+"/                   nil
                    classCategoryClone
                     classCategoryOpenInClass
                    classCategorySpawn
@@ -683,6 +693,8 @@
                     nil
                     nil
                     nil
+"/                    nil
+"/                    nil
                     nil
                     nil
                     nil
@@ -709,7 +721,7 @@
     ^ m
 
     "Created: 14.9.1995 / 10:50:17 / claus"
-    "Modified: 9.9.1996 / 22:19:16 / cg"
+    "Modified: 26.10.1996 / 14:25:36 / cg"
 !
 
 classCategoryNewCategory
@@ -1745,7 +1757,7 @@
 
     labels := labels , #(
                           '='
-                          'others ...'
+                          'others'
                         ).
     selectors := selectors , #(
                           nil
@@ -1767,7 +1779,7 @@
     m subMenuAt:#otherMenu put:specialMenu.
     ^ m
 
-    "Modified: 15.10.1996 / 20:42:34 / cg"
+    "Modified: 26.10.1996 / 11:37:39 / cg"
 !
 
 classNewClass
@@ -5796,7 +5808,7 @@
     specialMenu notNil ifTrue:[
         labels := labels , #(
                         '='
-                        'others ...'
+                        'others'
                   ).
         selectors := selectors , #(
                         nil
@@ -5841,7 +5853,7 @@
 
     "Created: 23.11.1995 / 12:02:29 / cg"
     "Modified: 18.12.1995 / 16:20:07 / stefan"
-    "Modified: 14.10.1996 / 15:47:06 / cg"
+    "Modified: 26.10.1996 / 11:37:57 / cg"
 !
 
 methodMove
@@ -8153,6 +8165,6 @@
 !BrowserView class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libtool/BrowserView.st,v 1.192 1996-10-23 21:46:36 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/BrowserView.st,v 1.193 1996-10-26 13:26:42 cg Exp $'
 ! !
 BrowserView initialize!