--- a/DeviceGraphicsContext.st	Sat Jan 08 16:25:31 2000 +0100
+++ b/DeviceGraphicsContext.st	Tue Jan 11 12:05:53 2000 +0100
@@ -3631,10 +3631,12 @@
 
     "make certain Workstation is initialized - just a check - will vanish soon"
     Display isNil ifTrue:[
-	Screen current isNil ifTrue:[
-            'DeviceGraphicsContext [warning]: Display not initialized when first DeviceGraphicsContext created' errorPrintCR.
-            Workstation initialize
-	]
+        Screen current isNil ifTrue:[
+            Smalltalk isHeadless ifFalse:[
+                'DeviceGraphicsContext [warning]: Display not initialized when first DeviceGraphicsContext created' errorPrintCR.
+                Workstation initialize
+            ].
+        ]
     ].
 
 
@@ -3852,6 +3854,6 @@
 !DeviceGraphicsContext class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libview/DeviceGraphicsContext.st,v 1.74 1999-10-27 13:31:14 stefan Exp $'
+    ^ '$Header: /cvs/stx/stx/libview/DeviceGraphicsContext.st,v 1.75 2000-01-11 11:05:53 cg Exp $'
 ! !
 DeviceGraphicsContext initialize!