--- a/ChangesBrowser.st Sun Dec 03 19:45:01 1995 +0100
+++ b/ChangesBrowser.st Mon Dec 04 00:08:50 1995 +0100
@@ -578,6 +578,17 @@
chunk := changeChunks at:changeNr.
chunk isNil ifTrue:[^ nil]. "mhmh - empty"
+ "/ fix it
+ (chunk endsWith:'primitiveDefinitions:') ifTrue:[
+ chunk := chunk , ''''''
+ ].
+ (chunk endsWith:'primitiveFunctions:') ifTrue:[
+ chunk := chunk , ''''''
+ ].
+ (chunk endsWith:'primitiveVariables:') ifTrue:[
+ chunk := chunk , ''''''
+ ].
+
"
use parser to construct a parseTree
"
@@ -1932,4 +1943,4 @@
!ChangesBrowser class methodsFor:'documentation'!
version
-^ '$Header: /cvs/stx/stx/libtool/ChangesBrowser.st,v 1.56 1995-12-03 18:45:01 cg Exp $'! !
+^ '$Header: /cvs/stx/stx/libtool/ChangesBrowser.st,v 1.57 1995-12-03 23:08:30 cg Exp $'! !