--- a/ProjectDefinition.st Wed Oct 14 14:12:40 2009 +0200
+++ b/ProjectDefinition.st Wed Oct 14 16:07:26 2009 +0200
@@ -4037,7 +4037,7 @@
selector := aMethod selector.
oldPackage := extensionOverwriteInfo at:(mclass name,'>>',selector) ifAbsent:nil.
oldPackage isNil ifTrue:[^ nil].
- ^ oldPackage asPackageId projectDefinition
+ ^ oldPackage asPackageId projectDefinitionClass
savedOverwrittenMethodForClass:mclass selector:selector.
!
@@ -4105,7 +4105,7 @@
savedOverwrittenMethodForClass:aClass selector:aSelector
"return one of my saved original methods"
- ^ safeForOverwrittenMethods at:(aClass name,'>>',aSelector)
+ ^ safeForOverwrittenMethods at:(aClass name,'>>',aSelector) ifAbsent:nil
! !
!ProjectDefinition class methodsFor:'private-loading'!
@@ -4679,11 +4679,11 @@
!ProjectDefinition class methodsFor:'documentation'!
version
- ^ '$Header: /cvs/stx/stx/libbasic/ProjectDefinition.st,v 1.252 2009-10-14 11:30:27 cg Exp $'
+ ^ '$Header: /cvs/stx/stx/libbasic/ProjectDefinition.st,v 1.253 2009-10-14 14:07:26 cg Exp $'
!
version_CVS
- ^ '$Header: /cvs/stx/stx/libbasic/ProjectDefinition.st,v 1.252 2009-10-14 11:30:27 cg Exp $'
+ ^ '$Header: /cvs/stx/stx/libbasic/ProjectDefinition.st,v 1.253 2009-10-14 14:07:26 cg Exp $'
! !
ProjectDefinition initialize!