[BUG][FIX] ChangeSet not filing out class definitions

Bob Arning arning at charm.net
Sun Aug 1 21:20:31 UTC 1999


A ChangeSet does not file out classes which have been added but not changed. This is especially noticeable if you file in a change set and then file it out - *none* of the class definitions are saved. Fix included below (essentially what existed before changeset 1242 with allowance for #add becoming #new). Discovered in 2.5 with changeset 1358.

Cheers,
Bob

=======================================================
!ChangeSet methodsFor: 'private' stamp: 'RAA 8/1/1999 16:31'!
fileOutClassDefinition: class on: stream 
	"Write out class definition for the given class on the given stream, if the class definition was added or changed.  5/15/96 sw"

	((self atClass: class includes: #change) or: [self atClass: class includes: #new])
		ifTrue:
			[stream command: 'H3'; nextChunkPut: class definition; cr; command: '/H3']! !





More information about the Squeak-dev mailing list