display.rc
changeset 305 1e0cedf0e7a5
parent 304 b7ef06173222
child 308 6e6d557009c7
equal deleted inserted replaced
304:b7ef06173222 305:1e0cedf0e7a5
   373     "
   373     "
   374     displayType isNil ifTrue:[
   374     displayType isNil ifTrue:[
   375 	"use type of machine smalltalk is running on as default ..."
   375 	"use type of machine smalltalk is running on as default ..."
   376 
   376 
   377 	(isWindowsDisplay
   377 	(isWindowsDisplay
   378 	or:[displayVar startsWith:':0'
   378 	or:[(displayVar startsWith:':0')
   379 	or:[displayVar startsWith:(OperatingSystem getHostName , ':0')]]) 
   379 	or:[(displayVar startsWith:(OperatingSystem getHostName , ':0'))]]) 
   380 	ifTrue:[
   380 	ifTrue:[
   381 	    displayType := OperatingSystem getSystemType.
   381 	    displayType := OperatingSystem getSystemType.
   382 	]
   382 	]
   383     ]
   383     ]
   384 ].
   384 ].