merged in jv's changes
authorClaus Gittinger <cg@exept.de>
Wed, 05 Feb 2014 18:51:54 +0100
changeset 3444 91362ca070e5
parent 3443 b10ec0baed8e
child 3445 71962ba45fb7
merged in jv's changes
MethodFinder.st
--- a/MethodFinder.st	Wed Feb 05 18:51:48 2014 +0100
+++ b/MethodFinder.st	Wed Feb 05 18:51:54 2014 +0100
@@ -1320,9 +1320,9 @@
                                         self error: 'bad assn'].
                                 (sub value isKindOf: Class) ifTrue: [
                                         self error: 'class in assn'].
-                                sub value class == Symbol ifTrue: [sub value codePoint = 204 '$Ì' ifTrue: [
+                                sub value class == Symbol ifTrue: [sub value codePoint = 204 '$' ifTrue: [
                                         self error: 'Write into char']].
-                                sub value == $Ì ifTrue: [
+                                sub value == $ ifTrue: [
                                         self error: 'Write into char']
         "].
                 sub class == Array ifTrue: [
@@ -1637,10 +1637,10 @@
 !MethodFinder class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic3/MethodFinder.st,v 1.36 2013-09-28 12:54:57 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic3/MethodFinder.st,v 1.37 2014-02-05 17:51:54 cg Exp $'
 !
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libbasic3/MethodFinder.st,v 1.36 2013-09-28 12:54:57 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic3/MethodFinder.st,v 1.37 2014-02-05 17:51:54 cg Exp $'
 ! !