Changeset 0318d73 in tol for tolbase/lib/toltk/tolinspe.tcl

Timestamp:

Feb 14, 2012, 12:41:50 PM (15 years ago)

Author:

Jorge Pérez <josp.jorge@…>

Branches:

1941-docker-image-to-test, devel, master

Children:

9cffa5f

Parents:

3d8e270

Message:

fixes #1200, se corrige según la propuesta del ticket.

git-svn-id: ​https://www.tol-project.org/svn/tolp/trunk@4133 be4846ae-f051-483a-831f-b64e7d08527f

File:

• tolbase/lib/toltk/tolinspe.tcl (modified) (1 diff)

tolbase/lib/toltk/tolinspe.tcl

@@ -2130 +2130 @@
   set result [ list ]
   foreach i $lst {
-    lappend result \"$i\"
+    lappend result \"[string map {\" \\\"} $i]\"
   }
   return "SetOfText([join $result ,])"