From: Karol K. <roa...@us...> - 2005-06-27 20:37:56
|
Update of /cvsroot/amsn/msn In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv19962 Modified Files: plugins.tcl Log Message: Fixed: Invalid selection(id) bug Index: plugins.tcl =================================================================== RCS file: /cvsroot/amsn/msn/plugins.tcl,v retrieving revision 1.108 retrieving revision 1.109 diff -C2 -d -r1.108 -r1.109 *** plugins.tcl 5 Jun 2005 11:39:21 -0000 1.108 --- plugins.tcl 27 Jun 2005 20:37:06 -0000 1.109 *************** *** 628,632 **** variable w # don't do anything is there is no selection ! if { $selection(file) != "" } { # Do the actual loading and check if it loads properly set loaded [LoadPlugin $selection(name) $selection(required_version) \ --- 628,632 ---- variable w # don't do anything is there is no selection ! if { $selection(file) != "" && $selection(id) != ""} { # Do the actual loading and check if it loads properly set loaded [LoadPlugin $selection(name) $selection(required_version) \ *************** *** 676,679 **** --- 676,682 ---- # window path variable w + if {$selection(id)==""} { + return; + } # change the color $w.plugin_list itemconfigure $selection(id) -background #FFFFFF |