Fix for --debug
authorJan Vrany <jan.vrany@fit.cvut.cz>
Mon, 23 Jan 2012 10:00:34 +0100
changeset 83 40162ba13436
parent 82 e676efa2a286
child 84 77e12dbe97d3
Fix for --debug
reports/report-runner.st
--- a/reports/report-runner.st	Mon Jan 23 09:57:16 2012 +0100
+++ b/reports/report-runner.st	Mon Jan 23 10:00:34 2012 +0100
@@ -22,9 +22,7 @@
        Stderr nextPutAll:'  '; nextPutAll: each; cr.
     ].
 
-	(OperatingSystem getEnvironment: 'DISPLAY') notNil ifTrue:[
-        Smalltalk beHeadless: false.
-	].
+    Smalltalk beHeadless: (OperatingSystem getEnvironment: 'DISPLAY') isNil.
 ] ifFalse: [
 	Smalltalk beHeadless: true.
 ].