changeset 1124 | 53f6970d9d7d |
parent 1059 | 8c42c5ed48f2 |
child 1133 | 961f2b095c22 |
--- a/CharacterArray.st Tue Mar 26 17:08:34 1996 +0100 +++ b/CharacterArray.st Tue Mar 26 17:52:53 1996 +0100 @@ -3184,7 +3184,7 @@ ] ]. - score = maxLen ifTrue: [^ 100]. + score == maxLen ifTrue: [^ 100]. ^ 100 * score // maxLen " @@ -3199,5 +3199,5 @@ !CharacterArray class methodsFor:'documentation'! version - ^ '$Header: /cvs/stx/stx/libbasic/CharacterArray.st,v 1.65 1996-03-02 12:41:34 cg Exp $' + ^ '$Header: /cvs/stx/stx/libbasic/CharacterArray.st,v 1.66 1996-03-26 16:52:36 cg Exp $' ! !