--- a/XWorkstation.st	Fri Sep 26 12:25:04 2014 +0200
+++ b/XWorkstation.st	Wed Nov 26 17:03:51 2014 +0100
@@ -1607,6 +1607,18 @@
     ^ true
 !
 
+supportsXFTFonts
+    "return true, if this device supports xft font rendering.
+     Xft support is being cleaned up, as it is currently a big hack,
+     of which too many others need to know about currently."
+
+    ^ XftFontDescription notNil
+
+    "
+     Screen current supportsXFTFonts
+    "
+!
+
 usableHeightAt:aPoint
     "returns the usable height of the display (in pixels) at a given point
      Normally, the same as height, but may be smaller, in
@@ -13289,11 +13301,11 @@
 !XWorkstation class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libview/XWorkstation.st,v 1.592.2.2 2014-09-25 21:16:16 stefan Exp $'
+    ^ '$Header: /cvs/stx/stx/libview/XWorkstation.st,v 1.592.2.3 2014-11-26 16:03:51 stefan Exp $'
 !
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libview/XWorkstation.st,v 1.592.2.2 2014-09-25 21:16:16 stefan Exp $'
+    ^ '$Header: /cvs/stx/stx/libview/XWorkstation.st,v 1.592.2.3 2014-11-26 16:03:51 stefan Exp $'
 !
 
 version_SVN