ProjectDefinition.st
changeset 12274 a8ef1edeca71
parent 12271 8d974650b1d2
child 12286 1ec3c9c51787
--- 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!