DialogBox.st
changeset 5615 881147bd562b
parent 5597 6654cb9875c6
child 5619 1279213ad6a0
equal deleted inserted replaced
5614:b57886b61246 5615:881147bd562b
  6489 requestProject:title initialAnswer:initialTextOrNil suggestions:suggestions
  6489 requestProject:title initialAnswer:initialTextOrNil suggestions:suggestions
  6490     "Ask for a project (package-id)"
  6490     "Ask for a project (package-id)"
  6491 
  6491 
  6492     |allProjects|
  6492     |allProjects|
  6493 
  6493 
  6494     allProjects := Smalltalk allProjectIDs.
  6494     allProjects := Smalltalk allPackageIDs.
  6495     ^ self
  6495     ^ self
  6496         requestProject:title 
  6496         requestProject:title 
  6497         from:allProjects
  6497         from:allProjects
  6498         initialAnswer:initialTextOrNil 
  6498         initialAnswer:initialTextOrNil 
  6499         suggestions:suggestions
  6499         suggestions:suggestions