'From etoys3.0 of 7 March 2008 [Letztes Update: #2130] on 5 September 2008 at 1:31:06 pm'!
"Change Set:		dbusCore45-bf
Date:			5 September 2008
Author:			Bert Freudenberg

Name: DBus-Core-bf.45
Author: bf
Time: 5 September 2008, 1:28:03 pm
UUID: cec08c26-3c56-467f-a6b1-0477b421f01f
Ancestors: DBus-Core-bf.44

- make string arg accept WideString/WideSymbol (converted to UTF8)
- make array arg accept String (converted to ByteArray)"!


!String methodsFor: '*DBus-Core' stamp: 'bf 9/5/2008 12:18'!
dbusCoerceTo: type
	^(type = DBusArgument array)
		ifTrue: [self asByteArray]
		ifFalse: [self]! !


!WideString methodsFor: '*DBus-Core' stamp: 'bf 9/5/2008 12:14'!
dbusCoerceTo: type
	^self squeakToUtf8 dbusCoerceTo: type
! !


!WideSymbol methodsFor: '*DBus-Core' stamp: 'bf 9/5/2008 12:14'!
dbusCoerceTo: type
	^self squeakToUtf8 dbusCoerceTo: type
! !