Marcel Taeumel uploaded a new version of Tools to project The Trunk: http://source.squeak.org/trunk/Tools-mt.942.mcz
==================== Summary ====================
Name: Tools-mt.942 Author: mt Time: 28 February 2020, 2:25:27.228195 pm UUID: 60de91cf-f275-744b-91f0-58f80225d512 Ancestors: Tools-mt.941
Prepare 5.3rc3 --- All those "----" entries (SNAPSHOT, QUIT, etc.) in the changes file should not be of type #doIt, because that can cause Compiler/Parser errors. Change it to #misc instead. We might want to remove any other " if begins with ----" checks later, too.
=============== Diff against Tools-mt.941 ===============
Item was changed: ----- Method: ChangeList>>scanFile:from:to: (in category 'scanning') ----- scanFile: aFile from: startPosition to: stopPosition file := aFile. changeList := OrderedCollection new. list := OrderedCollection new. listIndex := 0. file position: startPosition. 'Scanning ', aFile localName, '...' displayProgressFrom: startPosition to: stopPosition during: [:bar | | prevChar itemPosition item | [file position < stopPosition] whileTrue: [bar value: file position. [file atEnd not and: [file peek isSeparator]] whileTrue: [prevChar := file next]. (file peekFor: $!!) ifTrue: [(prevChar = Character cr or: [prevChar = Character lf]) ifTrue: [self scanCategory]] ifFalse: [itemPosition := file position. item := file nextChunk. file skipStyleChunk. item size > 0 ifTrue: + [(item beginsWith: '----') + ifTrue: + [self addItem: (ChangeRecord new + file: file position: itemPosition type: #misc) + text: 'misc: ' , (item contractTo: 50)] + ifFalse: + [self addItem: (ChangeRecord new + file: file position: itemPosition type: #doIt) + text: 'do it: ' , (item contractTo: 50)]]]]]. - [self addItem: (ChangeRecord new file: file position: itemPosition type: #doIt) - text: 'do it: ' , (item contractTo: 50)]]]]. listSelections := Array new: list size withAll: false!
packages@lists.squeakfoundation.org