--- a/XWorkstation.st	Thu Aug 27 16:21:51 1998 +0200
+++ b/XWorkstation.st	Thu Aug 27 16:38:15 1998 +0200
@@ -7351,8 +7351,7 @@
 	"/ could not connect.
 	"/ only output a message, if running under X
 
-	((OperatingSystem platformName ~~ #win32)
-	or:[WinWorkstation isNil]) ifTrue:[
+	((OperatingSystem isMSWINDOWSlike not) or:[WinWorkstation isNil]) ifTrue:[
 	    'XWorkstation [warning]: cannot connect to Display.' errorPrintCR.
 	].
 	^ nil
@@ -9964,6 +9963,6 @@
 !XWorkstation class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libview/XWorkstation.st,v 1.291 1998-08-27 12:36:46 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libview/XWorkstation.st,v 1.292 1998-08-27 14:38:15 cg Exp $'
 ! !
 XWorkstation initialize!