--- a/AbstractSourceCodeManager.st	Tue Sep 12 16:13:16 2006 +0200
+++ b/AbstractSourceCodeManager.st	Wed Sep 13 18:18:45 2006 +0200
@@ -223,6 +223,22 @@
 
 !AbstractSourceCodeManager class methodsFor:'basic administration'!
 
+checkForExistingContainer:fileName inPackage:aPackage
+    "check if a source-code container is present in a packages directory."
+
+    |packageDir moduleDir|
+
+    packageDir := aPackage asPackageId directory.
+    moduleDir := aPackage asPackageId module. 
+
+    ^ self 
+        checkForExistingContainerInModule:moduleDir 
+        directory:packageDir 
+        container:fileName
+
+    "Created: / 13-09-2006 / 18:10:30 / cg"
+!
+
 checkForExistingContainerForClass:aClass
     "check if a source-code container for a given class is present in the repository."
 
@@ -2358,7 +2374,7 @@
 !AbstractSourceCodeManager class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic3/AbstractSourceCodeManager.st,v 1.191 2006-09-12 14:13:16 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic3/AbstractSourceCodeManager.st,v 1.192 2006-09-13 16:18:45 cg Exp $'
 ! !
 
 AbstractSourceCodeManager initialize!