--- a/Smalltalk.st	Sun Oct 14 23:39:40 2018 +0200
+++ b/Smalltalk.st	Mon Oct 15 00:23:02 2018 +0200
@@ -8053,16 +8053,16 @@
 
     ^ aPackage asPackageId packageDirectory.
 
-    "/ there might be a package specific resource directory ...
-    "/ in the directory, from which the project was loaded
-    prj := Project projectWithId:aPackage.
-    prj notNil ifTrue:[
-	prjDir := prj directory.
-    ].
-    (prjDir notNil and:[prjDir asFilename exists]) ifFalse:[
-	prjDir := Smalltalk getPackageFileName:(aPackage copyReplaceAll:$: with:$/).
-    ].
-    ^ prjDir
+"/    "/ there might be a package specific resource directory ...
+"/    "/ in the directory, from which the project was loaded
+"/    prj := Project projectWithId:aPackage.
+"/    prj notNil ifTrue:[
+"/        prjDir := prj directory.
+"/    ].
+"/    (prjDir notNil and:[prjDir asFilename exists]) ifFalse:[
+"/        prjDir := Smalltalk getPackageFileName:(aPackage copyReplaceAll:$: with:$/).
+"/    ].
+"/    ^ prjDir
 
     "
      Smalltalk projectDirectoryForPackage:'stx:libbasic'