XWorkstation.st
changeset 2287 513c7ef7db79
parent 2286 111e4f4993be
child 2289 248c04e89613
--- a/XWorkstation.st	Thu Aug 27 13:56:09 1998 +0200
+++ b/XWorkstation.st	Thu Aug 27 14:36:46 1998 +0200
@@ -7349,11 +7349,10 @@
 
     displayId isNil ifTrue:[
 	"/ could not connect.
-
-	((OperatingSystem platformName == #win32)
-	and:[WinWorkstation notNil]) ifTrue:[
-	    'XWorkstation [info]: using local windows display.' infoPrintCR.
-	] ifFalse:[
+	"/ only output a message, if running under X
+
+	((OperatingSystem platformName ~~ #win32)
+	or:[WinWorkstation isNil]) ifTrue:[
 	    'XWorkstation [warning]: cannot connect to Display.' errorPrintCR.
 	].
 	^ nil
@@ -9965,6 +9964,6 @@
 !XWorkstation class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libview/XWorkstation.st,v 1.290 1998-08-27 11:56:09 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libview/XWorkstation.st,v 1.291 1998-08-27 12:36:46 cg Exp $'
 ! !
 XWorkstation initialize!