equal
deleted
inserted
replaced
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 |