--- a/BrowserView.st Wed Oct 21 19:16:56 1998 +0200
+++ b/BrowserView.st Wed Oct 21 20:54:39 1998 +0200
@@ -3331,7 +3331,7 @@
t := (t , ')')
].
t := t , ' ?'.
- t := (resources string:t with:currentClass name with:count) withCRs.
+ t := (resources string:t with:currentClass name asText allBold with:count) withCRs.
box := YesNoBox
title:t
@@ -3389,7 +3389,7 @@
box destroy.
]
- "Modified: / 10.4.1998 / 12:25:43 / cg"
+ "Modified: / 21.10.1998 / 20:49:52 / cg"
!
classRename
@@ -3399,7 +3399,9 @@
self checkClassSelected ifFalse:[^ self].
box := self
- enterBoxTitle:(resources string:'rename %1 to:' with:currentClass name)
+ enterBoxTitle:(resources
+ string:'rename %1 to:'
+ with:currentClass name asText allBold)
okText:'rename'
label:'rename class'.
@@ -3407,7 +3409,7 @@
box action:[:aString | self renameCurrentClassTo:aString].
box showAtPointer
- "Modified: 15.1.1997 / 23:10:15 / cg"
+ "Modified: / 21.10.1998 / 20:50:33 / cg"
!
classShowFrom:getSelector set:setSelector aspect:aspectSymbol default:default
@@ -12581,6 +12583,6 @@
!BrowserView class methodsFor:'documentation'!
version
- ^ '$Header: /cvs/stx/stx/libtool/BrowserView.st,v 1.458 1998-10-21 15:21:23 cg Exp $'
+ ^ '$Header: /cvs/stx/stx/libtool/BrowserView.st,v 1.459 1998-10-21 18:54:39 cg Exp $'
! !
BrowserView initialize!
--- a/BrwsrView.st Wed Oct 21 19:16:56 1998 +0200
+++ b/BrwsrView.st Wed Oct 21 20:54:39 1998 +0200
@@ -3331,7 +3331,7 @@
t := (t , ')')
].
t := t , ' ?'.
- t := (resources string:t with:currentClass name with:count) withCRs.
+ t := (resources string:t with:currentClass name asText allBold with:count) withCRs.
box := YesNoBox
title:t
@@ -3389,7 +3389,7 @@
box destroy.
]
- "Modified: / 10.4.1998 / 12:25:43 / cg"
+ "Modified: / 21.10.1998 / 20:49:52 / cg"
!
classRename
@@ -3399,7 +3399,9 @@
self checkClassSelected ifFalse:[^ self].
box := self
- enterBoxTitle:(resources string:'rename %1 to:' with:currentClass name)
+ enterBoxTitle:(resources
+ string:'rename %1 to:'
+ with:currentClass name asText allBold)
okText:'rename'
label:'rename class'.
@@ -3407,7 +3409,7 @@
box action:[:aString | self renameCurrentClassTo:aString].
box showAtPointer
- "Modified: 15.1.1997 / 23:10:15 / cg"
+ "Modified: / 21.10.1998 / 20:50:33 / cg"
!
classShowFrom:getSelector set:setSelector aspect:aspectSymbol default:default
@@ -12581,6 +12583,6 @@
!BrowserView class methodsFor:'documentation'!
version
- ^ '$Header: /cvs/stx/stx/libtool/Attic/BrwsrView.st,v 1.458 1998-10-21 15:21:23 cg Exp $'
+ ^ '$Header: /cvs/stx/stx/libtool/Attic/BrwsrView.st,v 1.459 1998-10-21 18:54:39 cg Exp $'
! !
BrowserView initialize!