--- a/XWorkstation.st	Mon Sep 08 16:53:24 2014 +0100
+++ b/XWorkstation.st	Thu Oct 09 00:05:21 2014 +0100
@@ -13384,6 +13384,18 @@
     ^ super displayString:aString x:x y:y opaque:opaque
 ! !
 
+!XWorkstation::X11GraphicsContext methodsFor:'initialization & release'!
+
+prepareForReinit
+    "kludge - clear drawableId and gcId
+     needed after snapin"
+
+    super prepareForReinit.
+    xftDrawId := nil.
+
+    "Created: / 09-10-2014 / 00:02:09 / Jan Vrany <jan.vrany@fit.cvut.cz>"
+! !
+
 !XWorkstation class methodsFor:'documentation'!
 
 version