equal
deleted
inserted
replaced
475 "/ '***** I will use a plain b&w viewStyle as a fallBack' errorPrintCR. |
475 "/ '***** I will use a plain b&w viewStyle as a fallBack' errorPrintCR. |
476 "/ anyWrong := true. |
476 "/ anyWrong := true. |
477 "/ missing := missing , '''resources'' '. |
477 "/ missing := missing , '''resources'' '. |
478 "/ ]. |
478 "/ ]. |
479 |
479 |
480 (Smalltalk getSystemFileName:'source/Object.st') isNil ifTrue:[ |
480 (Smalltalk getPackageFileName:'stx/libbasic/source/Object.st') isNil ifTrue:[ |
|
481 (Smalltalk getSystemFileName:'source/Object.st') isNil ifTrue:[ |
481 (Smalltalk getSystemFileName:'source/source.zip') isNil ifTrue:[ |
482 (Smalltalk getSystemFileName:'source/source.zip') isNil ifTrue:[ |
482 (Smalltalk getSystemFileName:'source/libbasic.zip') isNil ifTrue:[ |
483 (Smalltalk getSystemFileName:'source/libbasic.zip') isNil ifTrue:[ |
483 (Smalltalk getSourceFileName:'libbasic/Object.st') isNil ifTrue:[ |
484 (Smalltalk getSourceFileName:'libbasic/Object.st') isNil ifTrue:[ |
484 "/ |
485 "/ |
485 "/ there may still be a SourceCodeManager ... |
486 "/ there may still be a SourceCodeManager ... |
494 missing := missing , '''source'' '. |
495 missing := missing , '''source'' '. |
495 ] |
496 ] |
496 ] |
497 ] |
497 ] |
498 ] |
498 ] |
499 ] |
|
500 ] |
499 ]. |
501 ]. |
500 |
502 |
501 "/ |
503 "/ |
502 "/ no longer needed - if we have the package, |
504 "/ no longer needed - if we have the package, |
503 "/ we also have the bitmaps ... |
505 "/ we also have the bitmaps ... |