--- a/CBrowser.st Thu Aug 05 11:39:43 1999 +0200
+++ b/CBrowser.st Mon Aug 09 11:37:35 1999 +0200
@@ -1466,7 +1466,7 @@
headerLine := chunkText , ' (change)'.
] ifFalse:[
changeString := self contractClass:className selector:sel to:maxLen.
- changeType := '(method in: ''' , category , ''')'.
+ changeType := '{ ' , category , ' }'.
headerLine := className , ' ' , sel , ' ' , '(change category: ''' , category , ''')'.
].
@@ -3135,5 +3135,5 @@
!ChangesBrowser class methodsFor:'documentation'!
version
- ^ '$Header: /cvs/stx/stx/libtool/Attic/CBrowser.st,v 1.166 1999-07-26 12:10:36 cg Exp $'
+ ^ '$Header: /cvs/stx/stx/libtool/Attic/CBrowser.st,v 1.167 1999-08-09 09:37:35 cg Exp $'
! !
--- a/ChangesBrowser.st Thu Aug 05 11:39:43 1999 +0200
+++ b/ChangesBrowser.st Mon Aug 09 11:37:35 1999 +0200
@@ -1466,7 +1466,7 @@
headerLine := chunkText , ' (change)'.
] ifFalse:[
changeString := self contractClass:className selector:sel to:maxLen.
- changeType := '(method in: ''' , category , ''')'.
+ changeType := '{ ' , category , ' }'.
headerLine := className , ' ' , sel , ' ' , '(change category: ''' , category , ''')'.
].
@@ -3135,5 +3135,5 @@
!ChangesBrowser class methodsFor:'documentation'!
version
- ^ '$Header: /cvs/stx/stx/libtool/ChangesBrowser.st,v 1.166 1999-07-26 12:10:36 cg Exp $'
+ ^ '$Header: /cvs/stx/stx/libtool/ChangesBrowser.st,v 1.167 1999-08-09 09:37:35 cg Exp $'
! !