changeset 1324 | 50ea68e7e558 |
parent 1323 | fc14ab0fd388 |
child 1327 | 3645e5215142 |
--- a/ProjectBrowser.st Wed Feb 02 17:45:25 2000 +0100 +++ b/ProjectBrowser.st Wed Feb 02 19:11:27 2000 +0100 @@ -4468,7 +4468,7 @@ p type:self projectType value. dir := self projectDirectory value. - dir := (dir ? '') withoutSeparators asFilename. + dir := (dir ? '') asFilename. (dir exists and:[dir isDirectory]) ifFalse:[ self warn:'Invalid project directory: ' , dir pathName ].