Diego:

Perdí tu mail , por eso mando a las listas.
Los .st son mis propuestas para el problema del IP local ,con esto y log en
true las máquinas intercambian mensajes hasta que sale el error del .log.
Recuerdo que : 
La máquina que corre en OS9 tiene su IP correcto, pero no puede ser
identificada por nombre ( si por su IP)
La máquina que corre en OS X tiene como IP 127.0.0.1 , pero con mi
modificación esto se corrige. Puede ser identificada por su nombre.

Hay algun otro material para el rST? Estoy con la idea de "comandar"
externamente mi imagen reducida

Edgar

-------------- next part --------------
'From Squeak3.6 of ''6 October 2003'' [latest update: #5424] on 14 January 2004 at 4:08:25 pm'!

!RSTBroker methodsFor: 'initialization' stamp: 'edc 1/14/2004 15:43'!
initialize
	Socket initializeNetwork.
	"brokerID _ NetNameResolver localAddressString , ':' , port asString."
	" 
	initialize client side"
	proxies _ WeakValueDictionary new.
	proxiesMutex _ Semaphore forMutualExclusion.
	lastRemoteBrokers _ #().
	" 
	initialize server side"
	exportedObjects _ WeakKeyManager new.
	exportedObjects
		onNewKey: [:object :key | " 
			new exported objects will live some time, so the other images  
			can send me a notification"
			rememberer
				remember: object
				forSeconds: 6 * 60 * 60
				naming: brokerID].
	rememberer _ RSTRememberer new.
	""
	self startNetwork! !
-------------- next part --------------
'From Squeak3.6 of ''6 October 2003'' [latest update: #5424] on 14 January 2004 at 4:08:33 pm'!

!RSTBroker methodsFor: 'connection - client - sockets' stamp: 'edc 1/14/2004 15:48'!
withSocketTo: brokerIDString do: aBlock 
	"evaluate aBlock when an open socket to brokerIDString"
	| socket |
	socket _ self connectTo: brokerIDString.
brokerID _ (NetNameResolver stringFromAddress: (socket localAddress)).
	[aBlock value: socket]
		ensure: [socket closeAndDestroy]! !
-------------- next part --------------
'From Squeak3.6 of ''6 October 2003'' [latest update: #5424] on 14 January 2004 at 4:08:39 pm'!

!RSTTesting class methodsFor: 'address configuration' stamp: 'edc 1/14/2004 16:07'!
serverAddress
| serverIP |
serverIP _ FillInTheBlank request: 'What is your remote Test Server?' initialAnswer: ''.
	^ NetNameResolver
		stringFromAddress: (NetNameResolver addressForName: 'serverIP')! !
-------------- next part --------------
RSTRemoteException: Error: RSTObjectNotFounds are not indexable
14 January 2004 4:03:47 pm

VM: Mac OS - Squeak3.6gamma of '11 September 2003' [latest update: #5420] Squeak VM 3.6.0b3
Image: Squeak3.6 [latest update: #5424]

RSTObjectTransporter>>resolve
	Receiver: a RSTObjectTransporter exception=RSTRemoteException: Error: RSTObjectNotFounds are not ind...etc...
	Arguments and temporary variables: 

	Receiver's instance variables: 
		type: 	#exception
		object: 	RSTRemoteException: Error: RSTObjectNotFounds are not indexable

RSTBroker>>sendExecutor:toBroker:
	Receiver: a RSTBroker brokerID:169.254.187.67 status:running
	Arguments and temporary variables: 
		anExecutor: 	a RSTRemoteMessage with selector: #subtractDate: and arguments: #(a...etc...
		brokerIDString: 	'169.254.6.4:9999'
		resultTransporter: 	a RSTObjectTransporter exception=RSTRemoteException: Error: ...etc...
		result: 	nil
		socket: 	a Socket[destroyed]
	Receiver's instance variables: 
		status: 	#running
		port: 	8888
		logging: 	true
		brokerID: 	'169.254.187.67'
		proxies: 	<<error during printing>>

RSTBroker>>sendMessage:to:
	Receiver: a RSTBroker brokerID:169.254.187.67 status:running
	Arguments and temporary variables: 
		aMessage: 	a Message with selector: #subtractDate: and arguments: #(15 January 2...etc...
		aRemoteObjectID: 	OID-D2DD1D38C at 169.254.6.4:9999
		remoteMessage: 	a RSTRemoteMessage with selector: #subtractDate: and arguments: ...etc...
	Receiver's instance variables: 
		status: 	#running
		port: 	8888
		logging: 	true
		brokerID: 	'169.254.187.67'
		proxies: 	<<error during printing>>

RSTRemoteObjectProxy>>xxxSend:
	Receiver: 15 January 2004
	Arguments and temporary variables: 
		aMessage: 	a Message with selector: #subtractDate: and arguments: #(15 January 2...etc...
	Receiver's instance variables: 
<<error during printing>>

--- The full stack ---
RSTObjectTransporter>>resolve
RSTBroker>>sendExecutor:toBroker:
RSTBroker>>sendMessage:to:
RSTRemoteObjectProxy>>xxxSend:
 - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
RSTRemoteObjectProxy>>doesNotUnderstand: #subtractDate:
RSTTesting class>>runClientTodayTests
RSTTesting class>>runClient
UndefinedObject>>DoIt
Compiler>>evaluate:in:to:notifying:ifFail:
[] in TextMorphEditor(ParagraphEditor)>>evaluateSelection
BlockContext>>on:do:
TextMorphEditor(ParagraphEditor)>>evaluateSelection
[] in PluggableTextMorph>>doIt
[] in PluggableTextMorph>>handleEdit:
TextMorphForEditView(TextMorph)>>handleEdit:
PluggableTextMorph>>handleEdit:
PluggableTextMorph>>doIt
Workspace(StringHolder)>>perform:orSendTo:
[] in MenuItemMorph>>invokeWithEvent:
BlockContext>>ensure:
CursorWithMask(Cursor)>>showWhile:
MenuItemMorph>>invokeWithEvent:
MenuItemMorph>>mouseUp:
MenuItemMorph>>handleMouseUp:
MouseButtonEvent>>sentTo:
MenuItemMorph(Morph)>>handleEvent:
MorphicEventDispatcher>>dispatchDefault:with:
MorphicEventDispatcher>>dispatchEvent:with:
MenuItemMorph(Morph)>>processEvent:using:
MorphicEventDispatcher>>dispatchDefault:with:
MorphicEventDispatcher>>dispatchEvent:with:
MenuMorph(Morph)>>processEvent:using:
MenuMorph(Morph)>>processEvent:
MenuMorph>>handleFocusEvent:
[] in HandMorph>>sendFocusEvent:to:clear:
PasteUpMorph>>becomeActiveDuring:
HandMorph>>sendFocusEvent:to:clear:
HandMorph>>sendEvent:focus:clear:
HandMorph>>sendMouseEvent:
HandMorph>>handleEvent:
HandMorph>>processEvents
[] in WorldState>>doOneCycleNowFor:
Array(SequenceableCollection)>>do:
WorldState>>handsDo:
WorldState>>doOneCycleNowFor:
WorldState>>doOneCycleFor:
WorldState>>doOneSubCycleFor:
PasteUpMorph>>doOneSubCycle
MenuMorph>>invokeModalAt:in:allowKeyboard:
MenuMorph>>invokeModal:
PluggableTextMorph>>scrollBarMenuButtonPressed:
[] in ScrollBar>>menuButtonMouseDown:
ScrollBar(MorphicModel)>>use:orMakeModelSelectorFor:in:
ScrollBar>>menuButtonMouseDown:
EventHandler>>send:to:withEvent:fromMorph:
EventHandler>>mouseDown:fromMorph:
RectangleMorph(Morph)>>mouseDown:
RectangleMorph(Morph)>>handleMouseDown:
MouseButtonEvent>>sentTo:
RectangleMorph(Morph)>>handleEvent:
MorphicEventDispatcher>>dispatchMouseDown:with:
-- and more not shown --