--- a/GroovyEvaluatorTests.st	Sun Aug 17 08:46:59 2014 +0100
+++ b/GroovyEvaluatorTests.st	Wed Sep 17 17:13:06 2014 +0100
@@ -107,9 +107,9 @@
 test_workspace_01
     | ws retval |
 
-    self skipIf: Screen current isNil description: 'This test needs connection to display'.
+    "/ self skipIf: Screen current isNil description: 'This test needs connection to display'.
 
-    ws := Workspace new.
+    ws := Workspace basicNew.
     retval := GroovyEvaluator evaluate: 'a = 1; a' notifying: ws.
     self assert: retval = 1.
     self assert: (Workspace workspaceVariables includesKey: 'a').
@@ -121,9 +121,9 @@
 test_workspace_02a
     | ws retval |
 
-    self skipIf: Screen current isNil description: 'This test needs connection to display'.
+    "/ self skipIf: Screen current isNil description: 'This test needs connection to display'.
 
-    ws := Workspace new.
+    ws := Workspace basicNew.
     Workspace workspaceVariables at: 'x' put: 10 asValue.
     retval := GroovyEvaluator evaluate: '10 + x' notifying: ws.
 
@@ -136,9 +136,9 @@
 test_workspace_02b
     | ws retval obj |
 
-    self skipIf: Screen current isNil description: 'This test needs connection to display'.
+    "/ self skipIf: Screen current isNil description: 'This test needs connection to display'.
 
-    ws := Workspace new.
+    ws := Workspace basicNew.
     obj := JAVA java lang Object new.
     Workspace workspaceVariables at: 'x' put: obj asValue.
     retval := GroovyEvaluator evaluate: 'x.hashCode()' notifying: ws.
@@ -151,9 +151,9 @@
 test_workspace_03
     | ws retval o |
 
-    self skipIf: Screen current isNil description: 'This test needs connection to display'.
+    "/ self skipIf: Screen current isNil description: 'This test needs connection to display'.
 
-    ws := Workspace new.
+    ws := Workspace basicNew.
     o := Object new.
     Workspace workspaceVariables at: 'y' put: o asValue.
     retval := GroovyEvaluator evaluate: 'y' notifying: ws.