Update of /cvsroot/pure-data/pd/src In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv18221
Modified Files: Tag: devel_0_39 desire.tk Log Message: fix to my previous commit
Index: desire.tk =================================================================== RCS file: /cvsroot/pure-data/pd/src/Attic/desire.tk,v retrieving revision 1.1.2.562 retrieving revision 1.1.2.563 diff -C2 -d -r1.1.2.562 -r1.1.2.563 *** desire.tk 19 Nov 2006 01:24:24 -0000 1.1.2.562 --- desire.tk 19 Nov 2006 01:46:01 -0000 1.1.2.563 *************** *** 1908,1914 **** set @text [lrange $mess 4 end] set c [lindex $mess 4] ! set c_pos [string first $c $mess 0] ! set s [string range $mess $c_pos end] ! regsub -all {\} $s "" text set @text $text set @longline 0 --- 1908,1918 ---- set @text [lrange $mess 4 end] set c [lindex $mess 4] ! if {$c != ""} { ! set c_pos [string first $c $mess 0] ! set s [string range $mess $c_pos end] ! regsub -all {\} $s "" text ! } else { ! set text "" ! } set @text $text set @longline 0