--- a/Class.st Thu Jan 30 21:12:09 1997 +0100
+++ b/Class.st Thu Jan 30 21:13:20 1997 +0100
@@ -1171,7 +1171,10 @@
oldMethod notNil ifTrue:[
oldMethod package ~= newMethod package ifTrue:[
- Project current rememberOverwrittenMethod:newMethod from:oldMethod
+ Project notNil ifTrue:[
+ "/ allow configurations without Project
+ Project rememberOverwrittenMethod:newMethod from:oldMethod
+ ]
]
].
@@ -1181,7 +1184,7 @@
"Created: 29.10.1995 / 19:42:42 / cg"
"Modified: 9.9.1996 / 22:39:32 / stefan"
- "Modified: 27.1.1997 / 11:52:08 / cg"
+ "Modified: 30.1.1997 / 21:08:14 / cg"
!
basicAddSelector:newSelector withMethod:newMethod
@@ -4880,6 +4883,6 @@
!Class class methodsFor:'documentation'!
version
- ^ '$Header: /cvs/stx/stx/libbasic/Class.st,v 1.254 1997-01-29 22:52:07 cg Exp $'
+ ^ '$Header: /cvs/stx/stx/libbasic/Class.st,v 1.255 1997-01-30 20:13:20 cg Exp $'
! !
Class initialize!