Bert Freudenberg uploaded a new version of ST80 to project The Trunk:
http://source.squeak.org/trunk/ST80-bf.175.mcz

==================== Summary ====================

Name: ST80-bf.175
Author: bf
Time: 8 December 2014, 2:02:23.412 am
UUID: b4102f05-6b6c-4c17-8344-b300953f369f
Ancestors: ST80-nice.174

Restore timestamps lost in assignment conversion.

=============== Diff against ST80-nice.174 ===============

Item was changed:
  ----- Method: Paragraph>>composeAll (in category 'composition') -----
  composeAll
  	"Compose a collection of characters into a collection of lines."
  
  	| startIndex stopIndex lineIndex maximumRightX compositionScanner |
  	lines := Array new: 32.
  	lastLine := 0.
  	maximumRightX := 0.
  	text size = 0
  		ifTrue:
  			[compositionRectangle := compositionRectangle withHeight: 0.
  			^maximumRightX].
  	startIndex := lineIndex := 1.
  	stopIndex := text size.
  	compositionScanner := CompositionScanner new forParagraph: self.
  	[startIndex > stopIndex] whileFalse: 
  		[self lineAt: lineIndex 
  				put: (compositionScanner composeLine: lineIndex 
  										fromCharacterIndex: startIndex 
  										inParagraph: self).
  		 maximumRightX := compositionScanner rightX max: maximumRightX.
  		 startIndex := (lines at: lineIndex) last + 1.
  		 lineIndex := lineIndex + 1].
  	self updateCompositionHeight.
  	self trimLinesTo: lineIndex - 1.
  	^ maximumRightX!

Item was changed:
  ----- Method: SyntaxError class>>buildMVCViewOn: (in category '*ST80-Support') -----
  buildMVCViewOn: aSyntaxError
  	"Answer an MVC view on the given SyntaxError."
  
  	| topView aListView aCodeView |
  	topView := StandardSystemView new
  		model: aSyntaxError;
  		label: 'Syntax Error';
  		minimumSize: 380 at 220.
  
  	aListView := PluggableListView on: aSyntaxError
  		list: #list
  		selected: #listIndex
  		changeSelected: nil
  		menu: #listMenu:.
  	aListView window: (0 at 0 extent: 380 at 20).
  	topView addSubView: aListView.
  
  	aCodeView := PluggableTextView on: aSyntaxError
  		text: #contents
  		accept: #contents:notifying:
  		readSelection: #contentsSelection
  		menu: #codePaneMenu:shifted:.
  	aCodeView window: (0 at 0 extent: 380 at 200).
  	topView addSubView: aCodeView below: aListView.
  
  	^ topView
  !