--- a/TerminalApplication.st	Thu Jul 07 16:12:48 2011 +0200
+++ b/TerminalApplication.st	Thu Jul 07 16:13:17 2011 +0200
@@ -351,18 +351,24 @@
 createWorkspace
     |scr|
 
+    (OperatingSystem isUNIXlike and:[XTermView notNil]) ifTrue:[
+        scr := XTermView new
+    ] ifFalse:[
     VT100TerminalView isNil ifTrue:[
         self error:'missing: VT100TerminalView'
     ].
 
-    scr := (HVScrollableView for:VT100TerminalView).
-    scr autoHideScrollBars:false.
-    scr horizontalMini:true.
+        scr := (HVScrollableView for:VT100TerminalView).
+        scr autoHideScrollBars:false.
+        scr horizontalMini:true.
+    ].
+
     self window realized ifTrue:[
         self window sensor pushUserEvent:#startShellInSelectedWindow for:self.
     ].
     ^ scr
 
+    "Modified: / 25-11-2010 / 12:45:26 / Jan Vrany <jan.vrany@fit.cvut.cz>"
     "Modified: / 08-04-2011 / 14:56:57 / cg"
 !
 
@@ -465,10 +471,6 @@
 
 !TerminalApplication class methodsFor:'documentation'!
 
-version
-    ^ '$Header: /cvs/stx/stx/libtool/TerminalApplication.st,v 1.9 2011-04-08 12:57:08 cg Exp $'
-!
-
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libtool/TerminalApplication.st,v 1.9 2011-04-08 12:57:08 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/TerminalApplication.st,v 1.10 2011-07-07 14:13:17 vrany Exp $'
 ! !