Changeset 5153 for trunk/gui/scripts/mapviewer.tcl
- Timestamp:
- Mar 18, 2015 8:29:39 AM (9 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
trunk/gui/scripts/mapviewer.tcl
r5136 r5153 1237 1237 lappend cinfo "tool_command" [$dataobj hints toolcommand] 1238 1238 lappend cinfo "tool_revision" [$dataobj hints toolrevision] 1239 lappend cinfo "dataset_label" [ $dataobj hints label]1239 lappend cinfo "dataset_label" [encoding convertto utf-8 $info(label)] 1240 1240 lappend cinfo "dataset_tag" $layer 1241 1241 SendCmd "clientinfo [list $cinfo]" … … 1623 1623 incr _labelCount 1624 1624 set label "Label $_labelCount" 1625 SendCmd [list "map" "pin" "add" $x $y $label]1625 SendCmd [list "map" "pin" "add" $x $y [encoding convertto utf-8 $label]] 1626 1626 } 1627 1627 "delete" { … … 2543 2543 } 2544 2544 } 2545 SendCmd "[list map attrib [ join $attrib ,]]"2545 SendCmd "[list map attrib [encoding convertto utf-8 [join $attrib ,]]]" 2546 2546 label $f.map_attrib -text [join $attrib \n] -font "Arial 9" 2547 2547 blt::table $f $row,0 $f.map_attrib -anchor sw -pady 2 -cspan 2
Note: See TracChangeset
for help on using the changeset viewer.