--- a/XWorkstation.st	Fri Dec 20 10:57:03 2013 +0100
+++ b/XWorkstation.st	Fri Dec 20 11:03:12 2013 +0100
@@ -700,6 +700,12 @@
 
 !XWorkstation methodsFor:'accessing'!
 
+displayId
+    ^ displayId
+
+    "Created: / 20-12-2013 / 11:02:39 / Jan Vrany <jan.vrany@fit.cvut.cz>"
+!
+
 maxOperationsUntilFlush
     ^ maxOperationsUntilFlush
 !
@@ -712,6 +718,12 @@
      Ubuntu 12.04 64bit running on a VMware player (2013-11)."
 
     maxOperationsUntilFlush := anIntegerOrNil.
+!
+
+screen
+    ^ screen
+
+    "Created: / 20-12-2013 / 11:02:46 / Jan Vrany <jan.vrany@fit.cvut.cz>"
 ! !
 
 !XWorkstation methodsFor:'accessing & queries'!
@@ -13015,11 +13027,11 @@
 !XWorkstation class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libview/XWorkstation.st,v 1.578 2013-12-06 14:18:37 stefan Exp $'
+    ^ '$Header: /cvs/stx/stx/libview/XWorkstation.st,v 1.579 2013-12-20 10:03:12 vrany Exp $'
 !
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libview/XWorkstation.st,v 1.578 2013-12-06 14:18:37 stefan Exp $'
+    ^ '$Header: /cvs/stx/stx/libview/XWorkstation.st,v 1.579 2013-12-20 10:03:12 vrany Exp $'
 !
 
 version_SVN