From: <tom...@us...> - 2008-09-06 07:44:29
|
Revision: 10421 http://amsn.svn.sourceforge.net/amsn/?rev=10421&view=rev Author: tomhennigan Date: 2008-09-06 07:44:38 +0000 (Sat, 06 Sep 2008) Log Message: ----------- Add sanity check when unsetting a config key. Modified Paths: -------------- trunk/amsn/config.tcl Modified: trunk/amsn/config.tcl =================================================================== --- trunk/amsn/config.tcl 2008-09-06 07:35:54 UTC (rev 10420) +++ trunk/amsn/config.tcl 2008-09-06 07:44:38 UTC (rev 10421) @@ -580,7 +580,9 @@ } proc unsetKey {key} { - unset ::config($key) + if { [::config::isSet $key] } { + unset ::config($key) + } } proc isSet {key} { This was sent by the SourceForge.net collaborative development platform, the world's largest Open Source development site. |