--- a/AbstractSourceCodeManager.st	Tue Oct 04 11:53:58 2016 +0200
+++ b/AbstractSourceCodeManager.st	Thu Oct 06 10:29:26 2016 +0200
@@ -682,7 +682,7 @@
 
     |extractBaseAndVersion versionIsGreater vsnNumberString baseName|
 
-    (CacheDirectoryName isNil or:[CacheDirectoryName asFileName isDirectory not]) ifTrue:[
+    (CacheDirectoryName isNil or:[CacheDirectoryName asFilename isDirectory not]) ifTrue:[
         ^ self
     ].