id	summary	reporter	owner	description	type	status	priority	milestone	component	version	severity	resolution	keywords	cc
1200	Tcl function: TclList2SetOfText	Pedro Gea	Jorge	"La función Tcl {{{TclList2SetOfText}}} no funciona adecuadamente si los textos tienen comillas en su interior:
{{{
#!java
Set Eval(Tcl_Eval(""
TclList2SetOfText [list {un texto} {otro texto \""distinto\""}]
"")[1]);
// ERROR: [3] Argumento distinto fuera de lugar. Símbolo fuera de 
// lugar.  en el carácter 42, línea 1:
// > SetOfText(""un texto"",""otro texto ""distinto"""")
//                                            ^
}}}

Se propone una alternativa a la función implementada en: [source:tolp/trunk/tolbase/lib/toltk/tolinspe.tcl tolinspe.tcl] línea 2129:
{{{
#!tcl
proc TclList2SetOfText { lst } {
  set result [ list ]
  foreach i $lst {
    lappend result \""[string map {\"" \\\""} $i]\""
  }
  return ""SetOfText([join $result ,])""
}
}}}"	defect	closed	normal	Mantainance	Interface	head	normal	fixed