--- 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!