ProjectBrowser.st
changeset 1293 b83aae064c4d
parent 1292 f5fcf9ef07ab
child 1298 64cfa48905dc
equal deleted inserted replaced
1292:f5fcf9ef07ab 1293:b83aae064c4d
  3177         ]
  3177         ]
  3178     ].
  3178     ].
  3179 !
  3179 !
  3180 
  3180 
  3181 hasProjectSelectedAndProjectFilenameHolderAndProjectCodeIsLoaded
  3181 hasProjectSelectedAndProjectFilenameHolderAndProjectCodeIsLoaded
       
  3182 ^ true.
  3182     ^ [ |dir|
  3183     ^ [ |dir|
  3183 
  3184 
  3184         dir := self projectDirectory value asFilename.
  3185         dir := self projectDirectory value asFilename.
  3185         (dir exists and:[dir isDirectory]) ifTrue:[
  3186         (dir exists and:[dir isDirectory]) ifTrue:[
  3186             (self hasProjectSelectedHolder value) ifTrue:[
  3187             (self hasProjectSelectedHolder value) ifTrue:[