[squeak-dev] The Trunk: Nebraska-ar.18.mcz

commits at source.squeak.org commits at source.squeak.org
Mon Sep 7 22:11:46 UTC 2009


Andreas Raab uploaded a new version of Nebraska to project The Trunk:
http://source.squeak.org/trunk/Nebraska-ar.18.mcz

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

Name: Nebraska-ar.18
Author: ar
Time: 7 September 2009, 3:11:29 am
UUID: 07835b8a-a139-6d48-a999-09074a55c9f0
Ancestors: Nebraska-ar.17

Fix users of CustomMenu in Morphic and replace them with proper MenuMorph usage.

=============== Diff against Nebraska-ar.17 ===============

Item was changed:
  ObjectSocket subclass: #StringSocket
  	instanceVariableNames: 'numStringsInNextArray stringsForNextArray nextStringSize files startTime stringCounter socketWriterProcess outputQueue bytesInOutputQueue extraUnsentBytes transmissionError readBuffer'
+ 	classVariableNames: 'MaxRatesSeen RecentSendHistory RunningSendCount'
- 	classVariableNames: 'MaxRatesSeen RunningSendCount RecentSendHistory'
  	poolDictionaries: ''
  	category: 'Nebraska-Network-ObjectSocket'!
  
  !StringSocket commentStamp: 'ls 8/4/2004 15:15' prior: 0!
  This is a socket which sends arrays of strings back and forth.  This is less convenient than ObjectSockets, but it is more secure and it makes it easier to reason about updates to the protocol.
  
  An array of strings is represented on the network as:
  
  	4-bytes		number of strings in the array
  	4-byte		number of bytes in the first string
  	n1-bytes		characters in the first string
  	4-bytes		number of bytes in the second string
  	n2-bytes	characters in the second string
  	...
  
  !

Item was changed:
  EToyCommunicatorMorph subclass: #EToyListenerMorph
  	instanceVariableNames: 'listener updateCounter'
+ 	classVariableNames: 'GlobalIncomingQueue GlobalListener QueueSemaphore UpdateCounter WasListeningAtShutdown'
- 	classVariableNames: 'QueueSemaphore GlobalIncomingQueue UpdateCounter GlobalListener WasListeningAtShutdown'
  	poolDictionaries: ''
  	category: 'Nebraska-Morphic-Collaborative'!
  
  !EToyListenerMorph commentStamp: '<historical>' prior: 0!
  EToyListenerMorph new open
  EToyListenerMorph startListening.
  EToyListenerMorph stopListening.
  
  "
  EToyListenerMorph listens for messgaes from other EToy communicators. You need one of these open to receive messages from elsewhere.
  - Received Morphs are shown in a list. Items can be grabbed (a copy) or deleted.
  - Chat messages are sent to an appropriate EToyChatMorph (created if necessary)
  "
  
  !

Item was changed:
  ----- Method: EToyListenerMorph>>mouseDownEvent:for: (in category 'as yet unclassified') -----
  mouseDownEvent: event for: aMorph 
+ 	| menu depictedObject |
- 	| menu selection depictedObject |
  	depictedObject := aMorph firstSubmorph valueOfProperty: #depictedObject.
+ 	menu := MenuMorph new.
- 	menu := CustomMenu new.
  	menu
  		add: 'Grab' action: [event hand attachMorph: depictedObject veryDeepCopy];
  		add: 'Delete'
  			action: 
  				[self class removeFromGlobalIncomingQueue: depictedObject.
  				self rebuild].
+ 	menu title: 'Morph from ' , (aMorph submorphs second) firstSubmorph contents.
+ 	menu invokeModal.!
- 	selection := menu build startUpCenteredWithCaption: 'Morph from ' 
- 						, (aMorph submorphs second) firstSubmorph contents.
- 	selection ifNil: [^self].
- 	selection value!

Item was changed:
  EToyCommunicatorMorph subclass: #AudioChatGUI
  	instanceVariableNames: 'mycodec myrecorder mytargetip myalert playOnArrival theConnectButton soundBlockNumber soundMessageID queueForMultipleSends transmitWhileRecording theTalkButton handsFreeTalking handsFreeTalkingFlashTime'
+ 	classVariableNames: 'DebugLog LiveMessages NewAudioMessages PlayOnArrival'
- 	classVariableNames: 'PlayOnArrival LiveMessages DebugLog NewAudioMessages'
  	poolDictionaries: ''
  	category: 'Nebraska-Morphic-Collaborative'!

Item was changed:
  EToyCommunicatorMorph subclass: #EToyGateKeeperMorph
  	instanceVariableNames: 'counter'
+ 	classVariableNames: 'KnownIPAddresses UpdateCounter'
- 	classVariableNames: 'UpdateCounter KnownIPAddresses'
  	poolDictionaries: ''
  	category: 'Nebraska-Morphic-Experimental'!
  
  !EToyGateKeeperMorph commentStamp: '<historical>' prior: 0!
  EToyGateKeeperMorph new open
  
  "
  I am used to control the types of connections a user is willing to allow.
  "!

Item was changed:
  EToyCommunicatorMorph subclass: #EToyFridgeMorph
  	instanceVariableNames: 'recipients incomingRow recipientRow updateCounter groupMode'
+ 	classVariableNames: 'FridgeRecipients NewItems TheFridgeForm UpdateCounter'
- 	classVariableNames: 'UpdateCounter TheFridgeForm FridgeRecipients NewItems'
  	poolDictionaries: ''
  	category: 'Nebraska-Morphic-Collaborative'!
  
  !EToyFridgeMorph commentStamp: '<historical>' prior: 0!
  EToyFridgeMorph new openInWorld!




More information about the Squeak-dev mailing list