2506 ! !

  2507 

  2508 !SystemBrowser class methodsFor:'private-code update'!

  2509 

  2510 sourceOfMethod:mthd

  2511     |code|

  2512 

  2513     code := mthd source.

  2514     code notNil ifTrue:[ ^ code].

  2515 

  2516     "/ wrong: even if there is no source, we

  2517     "/ should be able to type in something and accept

  2518     "/ self setNoAcceptAction.

  2519 

  2520     (mthd sourcePosition isNil

  2521     or:[mthd getSource isNil]) ifTrue:[

  2522         ^ '"

  2523 Sorry, but the method''s sourceCode is not available.

  2524 

  2525 Probably, the method''s sourceCode-info was stripped from the system.

  2526 "'.

  2527     ].

  2528 

  2529     ^ '"

  2530 Sorry, but the method''s sourceCode is not available or corrupted.

  2531 

  2532 ',(Smalltalk isStandAloneApp ifTrue:['If this is a deployed application, this part of the source is probably not

  2533 part of the distribution (only the base Smalltalk/X framework is open-source).

  2534 '] ifFalse:['']),'

  2535 Please check the setting of your packagePath, which contains a collection of pathNames.

  2536 The system searches those directories for a package-subdirectories,

  2537 which should either contain the classes source file.

  2538 Also, check if that directory and/or sourceFile grants read access.

  2539 The packagePath can be accessed via

  2540     Smalltalk packagePath

  2541 

  2542 To fix this (in the running system), evaluate:

  2543     Smalltalk packagePath addFirst:''<<pathOfDirContainingPackageDir>>''.

  2544     Smalltalk flushPathCaches.

  2545 

  2546 You may also want to add those statements to the end of your ''private.rc''

  2547 file - so you will not get this error again and again.

  2548 

  2549 Also, check if you have the sourceCodeManagement (CVS) enabled,

  2550 and (if so) configured correctly.

  2551 

  2552 If all of the above fail, and you know the path of the source file,

  2553 you can workaround the problem, by adding a symbolic link to that sourcefile

  2554 in the ''source'' directory.

  2555 "'.

  2556 

  2557     "Modified: / 09-11-2017 / 08:16:28 / cg"