--- a/DeviceWorkstation.st	Thu Sep 25 21:45:05 2014 +0200
+++ b/DeviceWorkstation.st	Thu Sep 25 21:50:17 2014 +0200
@@ -938,6 +938,10 @@
     ^ false
 !
 
+isX11Platform
+    ^ false
+!
+
 platformName
     "ST-80 compatibility.
      Return a string describing the display systems platform.
@@ -7448,6 +7452,10 @@
     ^ self class isWindowsPlatform
 !
 
+isX11Platform
+    ^ self class isX11Platform
+!
+
 supportedClipboards
     "answer a collection of symbols with the supported clipboards..
      At least clipboard should be supported on any platform"
@@ -8415,11 +8423,11 @@
 !DeviceWorkstation class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libview/DeviceWorkstation.st,v 1.623 2014-09-23 11:36:50 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libview/DeviceWorkstation.st,v 1.624 2014-09-25 19:50:17 stefan Exp $'
 !
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libview/DeviceWorkstation.st,v 1.623 2014-09-23 11:36:50 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libview/DeviceWorkstation.st,v 1.624 2014-09-25 19:50:17 stefan Exp $'
 ! !