unknown option "address": should be create, retrieve, id, type, parent, name, canvas, editor, items, attribute, oid, select, unselect, selected, color, move, raise, lower, size, dump, postscript, flash, src, dst, points, delete
while executing
"$id address [lindex $result $i]"
invoked from within
"if {$i == 1} {
$id name [lindex $result $i]
} elseif {$i == 2 && [$id type] != "GROUP"} {
$id address [lindex $result $i]
} else {
$id attribute $att ..."
("foreach" body line 3)
invoked from within
"foreach att $list {
set att [lindex $att 0]
if {$i == 1} {
$id name [lindex $result $i]
} elseif {$i == 2 && [$id type] != "GROUP"} {
$id address [li ..."
(procedure "Tool::EditAttribute" line 16)
invoked from within
"Tool::EditAttribute link0"
invoked from within
".tkined0.canvas.popup invoke active"
("uplevel" body line 1)
invoked from within
"uplevel #0 [list $w invoke active]"
invoked from within
"if {[$w type active] == "cascade"} {
$w postcascade active
set menu [$w entrycget active -menu]
tkMenuFirstEntry $menu
} elseif {[$w type activ ..."
(procedure "tkMenuInvoke" line 2)
invoked from within
"tkMenuInvoke .tkined0.canvas.popup"
(command bound to event)
To replicate, start a fresh tkined 1.3.4 with scotty-2.0.2. Create two
nodes and link them. Create attributes for the link of:
speed 1024kb
type ip
then select edit select set values. The trace will occur.
This is under solaris 2.3 with tcl-7.4/tk-4.0.
Any ideas/patches?
-- John
John Rouillard
===============================================================================
My employers don't acknowledge my existence much less my opinions.