From: <ale...@us...> - 2012-08-18 18:36:38
|
Revision: 12410 http://amsn.svn.sourceforge.net/amsn/?rev=12410&view=rev Author: alexandernst Date: 2012-08-18 18:36:32 +0000 (Sat, 18 Aug 2012) Log Message: ----------- Fix (try/catch) lower in TCL 8.5.12 Modified Paths: -------------- trunk/amsn/guicontactlist.tcl Modified: trunk/amsn/guicontactlist.tcl =================================================================== --- trunk/amsn/guicontactlist.tcl 2012-06-19 18:54:29 UTC (rev 12409) +++ trunk/amsn/guicontactlist.tcl 2012-08-18 18:36:32 UTC (rev 12410) @@ -2351,7 +2351,9 @@ } } - $canvas lower $bgtag "$tag" + catch { + $canvas lower $bgtag "$tag" + } } This was sent by the SourceForge.net collaborative development platform, the world's largest Open Source development site. |