--- a/smalltalk.rc	Sat Sep 06 19:55:02 1997 +0200
+++ b/smalltalk.rc	Tue Sep 16 06:01:00 1997 +0200
@@ -99,7 +99,7 @@
 missing := ''.
 (Smalltalk getSystemFileName:'resources/SBrowser.rs') isNil ifTrue:[
     '***********************************************************************' errorPrintCR.
-    '***** ATTENTION: please check installation of your resource files' errorPrintCR.
+    '***** ATTENTION: please check installation of your >>resource<< files' errorPrintCR.
     '***** I will not be able to give non-english messages' errorPrintCR.
     anyWrong := true.
     missing := '''resources'' '.
@@ -110,22 +110,23 @@
     "/
     (Smalltalk at:#SourceCodeManager) isNil ifTrue:[
 	'***********************************************************************' errorPrintCR.
-	'***** ATTENTION: please check installation of your source files' errorPrintCR.
+	'***** ATTENTION: please check installation of your >>source<< files' errorPrintCR.
 	'***** ' errorPrintCR.
 	'***** the browser/debugger may not be able to show sourcecode.' errorPrintCR.
+	'***** Also, autoloading may fail if sourceFiles are missing.' errorPrintCR.
 	anyWrong := true.
 	missing := missing , '''source'' '.
     ]
 ].
 (Smalltalk getSystemFileName:'bitmaps/SBrowser.xbm') isNil ifTrue:[
     '***********************************************************************' errorPrintCR.
-    '***** ATTENTION: please check installation of your bitmap files' errorPrintCR.
+    '***** ATTENTION: please check installation of your >>bitmap<< files' errorPrintCR.
     anyWrong := true.
     missing := missing , '''bitmaps'' '.
 ].
 (Smalltalk getSystemFileName:'resources/normal.style') isNil ifTrue:[
     '***********************************************************************' errorPrintCR.
-    '***** ATTENTION: please check installation of your style files' errorPrintCR.
+    '***** ATTENTION: please check installation of your >>style<< files' errorPrintCR.
     '***** I will use a plain b&w viewStyle as a fallBack' errorPrintCR.
     anyWrong := true.
     missing := missing , '''resources'' '.
@@ -134,8 +135,11 @@
 anyWrong ifTrue:[
     '*****' errorPrintCR.
     '***** directory(s) named: ' errorPrint. missing errorPrint. 'incomplete/not existing' errorPrintCR.
-    '***** your path is: ' errorPrint.
-    Smalltalk systemPath asArray storeString errorPrintCR.
+    '***** I could not find the missing directory along your path,' errorPrintCR.
+    '***** which is:' errorPrintCR.
+    Smalltalk systemPath do:[:dir |
+        ('*****        ' , dir storeString) errorPrintCR.
+    ].
 
     '*****' errorPrintCR.
     '***** Try: "make source bitmaps resources styles"' errorPrintCR.