--- a/smalltalk.rc Fri Nov 03 17:34:13 1995 +0100
+++ b/smalltalk.rc Sun Nov 05 17:23:58 1995 +0100
@@ -51,12 +51,17 @@
missing := '''resources'' '.
].
(Smalltalk getSystemFileName:'source/Object.st') isNil ifTrue:[
- '***********************************************************************' errorPrintNL.
- '***** ATTENTION: please check installation of your source files' errorPrintNL.
- '***** ' errorPrintNL.
- '***** the browser/debugger may not be able to show sourcecode.' errorPrintNL.
- anyWrong := true.
- missing := missing , '''source'' '.
+ "/
+ "/ there may still be a SourceCodeManager ...
+ "/
+ SourceCodeManager isNil ifTrue:[
+ '***********************************************************************' errorPrintNL.
+ '***** ATTENTION: please check installation of your source files' errorPrintNL.
+ '***** ' errorPrintNL.
+ '***** the browser/debugger may not be able to show sourcecode.' errorPrintNL.
+ anyWrong := true.
+ missing := missing , '''source'' '.
+ ]
].
(Smalltalk getSystemFileName:'bitmaps/SBrowser.xbm') isNil ifTrue:[
'***********************************************************************' errorPrintNL.