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