--- a/UndefObj.st Sat Aug 24 12:08:45 1996 +0200
+++ b/UndefObj.st Wed Aug 28 15:19:12 1996 +0200
@@ -193,7 +193,7 @@
and modify the source code
"
methodDict := MethodDictionary new:3.
- #(#class #isBehavior #doesNotUnderstand) do:[:sel|
+ #(#class #isBehavior #doesNotUnderstand:) do:[:sel|
method := (Object compiledMethodAt:sel) copy.
method source: method source , '
"
@@ -290,5 +290,5 @@
!UndefinedObject class methodsFor:'documentation'!
version
- ^ '$Header: /cvs/stx/stx/libbasic/Attic/UndefObj.st,v 1.24 1996-06-12 22:11:08 stefan Exp $'
+ ^ '$Header: /cvs/stx/stx/libbasic/Attic/UndefObj.st,v 1.25 1996-08-28 13:19:12 cg Exp $'
! !
--- a/UndefinedObject.st Sat Aug 24 12:08:45 1996 +0200
+++ b/UndefinedObject.st Wed Aug 28 15:19:12 1996 +0200
@@ -193,7 +193,7 @@
and modify the source code
"
methodDict := MethodDictionary new:3.
- #(#class #isBehavior #doesNotUnderstand) do:[:sel|
+ #(#class #isBehavior #doesNotUnderstand:) do:[:sel|
method := (Object compiledMethodAt:sel) copy.
method source: method source , '
"
@@ -290,5 +290,5 @@
!UndefinedObject class methodsFor:'documentation'!
version
- ^ '$Header: /cvs/stx/stx/libbasic/UndefinedObject.st,v 1.24 1996-06-12 22:11:08 stefan Exp $'
+ ^ '$Header: /cvs/stx/stx/libbasic/UndefinedObject.st,v 1.25 1996-08-28 13:19:12 cg Exp $'
! !