Bug found by:
Submitted by:
Reviewed by:
Approved by:
Obtained from:
# and Technology through the research contract #IP-2003-143.
#
-# $Id: editor.tcl,v 1.84 2008/01/01 20:53:31 marko Exp $
+# $Id: editor.tcl,v 1.85 2008/01/01 20:56:25 marko Exp $
#****h* imunes/editor.tcl
# * link -- link id
#****
proc redrawLink { link } {
- global $link
-
set limages [.c find withtag "link && $link"]
set limage1 [lindex $limages 0]
set limage2 [lindex $limages 1]