--- a/Smalltalk.st	Wed Dec 03 14:39:09 2008 +0100
+++ b/Smalltalk.st	Wed Dec 03 14:43:27 2008 +0100
@@ -3235,6 +3235,8 @@
 !
 
 showSplashMessage:aMessageStringOrNil color:rgbValueOrNil
+    "put the message into the splash screen (if there is one)."
+
 %{
 #ifdef WIN32
     extern void __win32_splashMessage();
@@ -3242,11 +3244,11 @@
     int clr = 0;
 
     if (__isString(aMessageStringOrNil)) {
-	msg = __stringVal(aMessageStringOrNil);
+        msg = __stringVal(aMessageStringOrNil);
     }
     if (__isSmallInteger(rgbValueOrNil)) {
-	clr = __intVal(rgbValueOrNil);
-	__win32_splashMessageColor(clr);
+        clr = __intVal(rgbValueOrNil);
+        __win32_splashMessageColor(clr);
     }
     __win32_splashMessage(msg);
 #endif
@@ -3254,6 +3256,10 @@
 !
 
 splashInfo:aString
+    "like infoPrintCR,
+     but in addition put the message into the splash screen (if there is one).
+     Use this for info messages during startup"
+
     aString infoPrintCR.
     self showSplashMessage:aString color:nil.
 !
@@ -7170,5 +7176,5 @@
 !Smalltalk class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic/Smalltalk.st,v 1.862 2008-12-03 13:39:09 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic/Smalltalk.st,v 1.863 2008-12-03 13:43:27 cg Exp $'
 ! !