--- a/Smalltalk.st	Fri Dec 23 17:25:53 2005 +0100
+++ b/Smalltalk.st	Fri Dec 23 17:28:09 2005 +0100
@@ -24,7 +24,7 @@
 		SourceDirName BitmapDirName PackageDirName FileInDirName
 		ChangeFileName ImageStartTime ImageRestartTime DemoMode
 		SaveEmergencyImage SpecialObjectArray CallbackSignal
-		KnownPackages ClassesFailedToInitialize'
+		KnownPackages ClassesFailedToInitialize HasNoConsole'
 	poolDictionaries:''
 	category:'System-Support'
 !
@@ -3119,6 +3119,17 @@
     "Modified: 19.7.1996 / 11:11:16 / cg"
 !
 
+hasNoConsole
+    "return true, if this is a console-less application (i.e. I am winstx)
+     i.e. there should be no writing to stdout/stderr"
+
+    ^ HasNoConsole ? false
+
+    "
+     Smalltalk hasNoConsole   
+    "
+!
+
 isHeadless
     "return true, if this is a headless application
      i.e. no default Display connection is required/used"
@@ -6577,5 +6588,5 @@
 !Smalltalk class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic/Smalltalk.st,v 1.703 2005-12-21 22:37:54 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic/Smalltalk.st,v 1.704 2005-12-23 16:28:09 cg Exp $'
 ! !