[squeak-dev] The Trunk: Nebraska-ul.52.mcz

commits at source.squeak.org commits at source.squeak.org
Mon Feb 5 20:15:24 UTC 2018


Levente Uzonyi uploaded a new version of Nebraska to project The Trunk:
http://source.squeak.org/trunk/Nebraska-ul.52.mcz

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

Name: Nebraska-ul.52
Author: ul
Time: 22 January 2018, 12:52:51.341224 am
UUID: e116559d-9415-4aa7-95a3-3b2cdf0e375f
Ancestors: Nebraska-dtl.51

- removed #fixTemps sends

=============== Diff against Nebraska-dtl.51 ===============

Item was changed:
  ----- Method: NebraskaIncomingMessage class>>handleNewMorphFrom:sentBy:ipAddress: (in category 'handlers') -----
  handleNewMorphFrom: dataStream sentBy: senderName ipAddress: ipAddressString
  
  	| newObject thumbForm targetWorld |
  
  	newObject := self newObjectFromStream: dataStream.
  	NebraskaCommunicatorMorph playArrivalSound.
  	targetWorld := self currentWorld.
  	(NebraskaMorphsWelcomeMorph morphsWelcomeInWorld: targetWorld) ifTrue: [
  		newObject position: (
  			newObject 
  				valueOfProperty: #positionInOriginatingWorld 
  				ifAbsent: [(targetWorld randomBoundsFor: newObject) topLeft]
  		).
  		WorldState addDeferredUIMessage: [
  			newObject openInWorld: targetWorld.
+ 		].
- 		] fixTemps.
  		^self
  	].
  	thumbForm := newObject imageForm scaledToSize: 50 at 50.
  	Smalltalk at: #SugarListenerMorph ifPresent: [:c |
  		c addToGlobalIncomingQueue: {
  			thumbForm. newObject. senderName. ipAddressString
  		}.
  		WorldState addDeferredUIMessage: [
  			c ensureListenerInCurrentWorld
  		].
  	].!

Item was changed:
  ----- Method: NebraskaSenderMorph>>startNebraskaClient (in category 'as yet unclassified') -----
  startNebraskaClient
  
  	| newMorph |
  	[
  		[
  			newMorph := NetworkTerminalMorph connectTo: (self ipAddress copyUpTo: $:). "FIXME: get real port of Nebraska Server"
+ 			WorldState addDeferredUIMessage: [newMorph openInStyle: #scaled].
- 			WorldState addDeferredUIMessage: [newMorph openInStyle: #scaled] fixTemps.
  		]
  			on: Error
  			do: [ :ex |
  				WorldState addDeferredUIMessage: [
  					self inform: 'No connection to: ' translated. self ipAddress,' (',ex printString,')'
+ 				]
- 				] fixTemps
  			].
  	] fork
  !



More information about the Squeak-dev mailing list