--- 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
         ].