--- a/AbstractSourceCodeManager.st	Wed Oct 05 06:56:23 2016 +0200
+++ b/AbstractSourceCodeManager.st	Fri Oct 07 07:01:32 2016 +0200
@@ -745,7 +745,7 @@
 
     |extractBaseAndVersion versionIsGreater vsnNumberString baseName|
 
-    (CacheDirectoryName isNil or:[CacheDirectoryName asFileName isDirectory not]) ifTrue:[
+    (CacheDirectoryName isNil or:[CacheDirectoryName asFilename isDirectory not]) ifTrue:[
         ^ self
     ].