how replace comma with break line

Hi, 

Instead of John,Dee, i want it to show

John

Dee.

my code isn't do what i want, can anyone help pls?

thanks

<cfset mystring ="John,Dee" />

<cfset TheText = replace(mystring, ',', "#chr(10)##chr(13)#", "ALL") />

<cfoutput>

#TheText#

</cfoutput>