diff -r fbc9a32078b5 -r fc14ab0fd388 ProjectBrowser.st
--- a/ProjectBrowser.st	Wed Feb 02 17:14:25 2000 +0100
+++ b/ProjectBrowser.st	Wed Feb 02 17:45:25 2000 +0100
@@ -5749,7 +5749,7 @@
             outputTo:diagnostic 
             errorTo:diagnostic 
             inDirectory:(p directory asFilename pathName) 
-            onError:[error := true].
+            onError:[:status | error := true].
     ].