# HG changeset patch # User Claus Gittinger # Date 1255368425 -7200 # Node ID e3a4510c45f2a472019feeea12408887e5bf3eea # Parent a66ff7ef915392acee3bcec1603a46f24162732a Project noProjectID -> PackageId noProjectID diff -r a66ff7ef9153 -r e3a4510c45f2 SourceCodeManagerUtilities.st --- a/SourceCodeManagerUtilities.st Mon Oct 12 19:26:46 2009 +0200 +++ b/SourceCodeManagerUtilities.st Mon Oct 12 19:27:05 2009 +0200 @@ -784,7 +784,7 @@ sourceInfo := mgr sourceInfoOfClass:currentClass. sourceInfo notNil ifTrue:[ - currentClass package ~= Project noProjectID ifTrue:[ + currentClass package ~= PackageId noProjectID ifTrue:[ containerPackage := mgr directoryFromSourceInfo:sourceInfo. containerModule := mgr moduleFromSourceInfo:sourceInfo. ]. @@ -799,7 +799,7 @@ ]. rev isNil ifTrue:[ pkg := currentClass package. - (pkg notNil and:[pkg ~= Project noProjectID]) ifTrue:[ + (pkg notNil and:[pkg ~= PackageId noProjectID]) ifTrue:[ containerModule := pkg upTo:$:. containerPackage := pkg copyFrom:(containerModule size + 2). ]. @@ -2538,8 +2538,8 @@ |module package files| Cursor read showWhile:[ - module := moduleHolder value ? (Project noProjectID). - package := packageHolder value ? (Project noProjectID). + module := moduleHolder value ? (PackageId noProjectID). + package := packageHolder value ? (PackageId noProjectID). files := SourceCodeManager getExistingContainersInModule:module directory:package. files := files asOrderedCollection. @@ -3168,9 +3168,9 @@ !SourceCodeManagerUtilities class methodsFor:'documentation'! version - ^ '$Header: /cvs/stx/stx/libbasic3/SourceCodeManagerUtilities.st,v 1.194 2009-10-09 17:10:04 cg Exp $' + ^ '$Header: /cvs/stx/stx/libbasic3/SourceCodeManagerUtilities.st,v 1.195 2009-10-12 17:27:05 cg Exp $' ! version_CVS - ^ '$Header: /cvs/stx/stx/libbasic3/SourceCodeManagerUtilities.st,v 1.194 2009-10-09 17:10:04 cg Exp $' + ^ '$Header: /cvs/stx/stx/libbasic3/SourceCodeManagerUtilities.st,v 1.195 2009-10-12 17:27:05 cg Exp $' ! !