Hello,


How can I get rid of the above error message with this code : 


abbreviatePhrase: aString
    | splitted |
    splitted := aString
        splitOn: [ :char | char = Character space or: [ char = $- or: [ char = $_ ] ] ].
    ^ String
        streamContents: [ :stream | 
            splitted
                reject: [ :word | word isEmpty ]
               ��thenDo: [ :word | stream nextPut: word first uppercase ] ]


Regards, 

Roelof