JavaRelease.st
branchcvs_MAIN
changeset 3813 e485ceb7735d
parent 3800 f91a2f7260f9
child 3851 38ef6bdc1a2b
equal deleted inserted replaced
3812:8d9b80f37338 3813:e485ceb7735d
   382 "/                    each javaHome:('/System/Library/Java/Home' asFilename).
   382 "/                    each javaHome:('/System/Library/Java/Home' asFilename).
   383 "/                ].
   383 "/                ].
   384             ].
   384             ].
   385         ].
   385         ].
   386         releases isEmpty ifTrue: [
   386         releases isEmpty ifTrue: [
   387             self error: 'No Java release found'. ^nil
   387             JavaReleaseNotFoundError raiseSignalErrorString: 'No Java release found'. ^nil
   388         ].
   388         ].
   389     ].
   389     ].
   390     ^releases
   390     ^releases
   391 
   391 
   392     "
   392     "
   393         JavaRelease available
   393         JavaRelease available
   394     "
   394     "
   395 
   395 
   396     "Created: / 26-07-2012 / 23:41:09 / Jan Vrany <jan.vrany@fit.cvut.cz>"
   396     "Created: / 26-07-2012 / 23:41:09 / Jan Vrany <jan.vrany@fit.cvut.cz>"
   397     "Modified: / 08-12-2014 / 00:03:23 / Jan Vrany <jan.vrany@fit.cvut.cz>"
   397     "Modified: / 08-12-2014 / 00:03:23 / Jan Vrany <jan.vrany@fit.cvut.cz>"
       
   398     "Modified: / 28-08-2018 / 15:41:42 / Claus Gittinger"
   398 !
   399 !
   399 
   400 
   400 default
   401 default
   401     | releases |
   402     | releases |
   402 
   403