[squeak-dev] The Inbox: ST80-ct.256.mcz

commits at source.squeak.org commits at source.squeak.org
Fri Jun 12 13:47:15 UTC 2020


Christoph Thiede uploaded a new version of ST80 to project The Inbox:
http://source.squeak.org/inbox/ST80-ct.256.mcz

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

Name: ST80-ct.256
Author: ct
Time: 12 June 2020, 3:47:07.291483 pm
UUID: 43915256-7d01-d045-a49f-2c87552170e2
Ancestors: ST80-mt.255

Fix Transcript in MVC projects if preference 'Force transcript updates to screen' is disabled.

Thanks to Marcel (mt) for the hint!

Second try: Use conservative syntax. Replaces ST80-ct.255 wich can be treated.

=============== Diff against ST80-mt.255 ===============

Item was changed:
  ----- Method: PluggableTextView>>update: (in category 'updating') -----
  update: aSymbol
  	"Refer to the comment in View|update:. Do nothing if the given symbol does not match any action. "
  
  	aSymbol == #wantToChange ifTrue:
  			[self canDiscardEdits ifFalse: [self promptForCancel].  ^ self].
  	aSymbol == #flash ifTrue: [^ controller flash].
  	aSymbol == getTextSelector ifTrue: [^ self updateDisplayContents].
  	aSymbol == getSelectionSelector ifTrue: [^ self setSelection: self getSelection].
  	aSymbol == #clearUserEdits ifTrue: [^ self hasUnacceptedEdits: false].
  	(aSymbol == #autoSelect and: [getSelectionSelector ~~ nil]) ifTrue:
  			[ParagraphEditor abandonChangeText.	"no replacement!!"
  			^ controller setSearch: model autoSelectString;
  					againOrSame: true].
  	aSymbol == #appendEntry ifTrue:
  			[^ controller doOccluded: [controller appendEntry]].
+ 	aSymbol == #appendEntryLater ifTrue:
+ 			[^ controller doOccluded: [controller appendEntry]].
  	aSymbol == #clearText ifTrue:
  			[^ controller doOccluded:
  				[controller changeText: Text new]].
  	aSymbol == #bs ifTrue:
  			[^ controller doOccluded:
  				[controller bsText]].
  	aSymbol == #codeChangedElsewhere ifTrue:
  			[^ self hasEditingConflicts: true].
  	aSymbol == #saveContents ifTrue:
  			[^self controller saveContentsInFile].
  	aSymbol == #close ifTrue:
  			[^self topView controller closeAndUnscheduleNoTerminate].
  	aSymbol == #acceptChanges ifTrue:
  			[^ self controller accept].
  	aSymbol == #revertChanges ifTrue:
  			[^ self controller cancel].!



More information about the Squeak-dev mailing list