*** empty log message ***
authorClaus Gittinger <cg@exept.de>
Wed, 28 Aug 1996 15:19:12 +0200
changeset 1638 8df0060e4d73
parent 1637 0548117601bd
child 1639 56267c28a5e8
*** empty log message ***
UndefObj.st
UndefinedObject.st
--- 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 $'
 ! !