BrowserView.st
changeset 3424 ba8899bfd3fe
parent 3422 c282b5a3768c
child 3430 028c550c1798
--- a/BrowserView.st	Fri Nov 16 11:55:32 2001 +0100
+++ b/BrowserView.st	Fri Nov 16 12:35:31 2001 +0100
@@ -9595,7 +9595,7 @@
         someCategories := actualClass categories asOrderedCollection sort.
         box := self 
                 listBoxTitle:'' 
-                okText:'change' 
+                okText:'Change' 
                 list:someCategories.
     ].
 
@@ -9622,7 +9622,7 @@
     box open
 
     "Created: / 29.10.1995 / 19:59:22 / cg"
-    "Modified: / 16.11.2001 / 11:49:38 / cg"
+    "Modified: / 16.11.2001 / 12:07:47 / cg"
 !
 
 methodCompareSource
@@ -10371,10 +10371,10 @@
 "/    newClassName := (holders at:#className) value.
 
     newClassName := Dialog 
-                    request:(resources string:'move this method to which class:')
+                    request:(resources string:'Move this method to which class:')
                     initialAnswer:initial
-                    okLabel:(resources string:'move')
-                    title:(resources string:'move method')
+                    okLabel:(resources string:'Move')
+                    title:(resources string:'Move method')
                     onCancel:nil
                     list:list.
     newClassName isNil ifTrue:[^ self].
@@ -10412,8 +10412,8 @@
 
     self methodRemove
 
-    "Created: 13.12.1995 / 10:56:42 / cg"
-    "Modified: 25.6.1997 / 13:58:56 / cg"
+    "Created: / 13.12.1995 / 10:56:42 / cg"
+    "Modified: / 16.11.2001 / 12:10:00 / cg"
 !
 
 methodNewImageSpec
@@ -14950,6 +14950,6 @@
 !BrowserView class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libtool/BrowserView.st,v 1.693 2001-11-16 10:53:24 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/BrowserView.st,v 1.694 2001-11-16 11:35:31 cg Exp $'
 ! !
 BrowserView initialize!