Mercurial > pidgin

comparison plugins/tcl/tcl.c @ 10281:f1a4e59711f4

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
[gaim-migrate @ 11449] This probably caused minor leakage, and maybe instability ... thanks, Etan. committer: Tailor Script <tailor@pidgin.im>
author Ethan Blanton <elb@pidgin.im>
date Tue, 30 Nov 2004 17:39:06 +0000
parents f8e395a054e2
children 5976491e07a7
comparison
equal deleted inserted replaced
10280:b4dc55d994bf 10281:f1a4e59711f4
290 if (plugin == NULL) 290 if (plugin == NULL)
291 return TRUE; 291 return TRUE;
292 292
293 data = plugin->extra; 293 data = plugin->extra;
294 294
295 g_hash_table_remove(tcl_plugins, (gpointer)data); 295 g_hash_table_remove(tcl_plugins, (gpointer)(data->interp));
296 if (data != NULL) { 296 if (data != NULL) {
297 gaim_signals_disconnect_by_handle(data->interp); 297 gaim_signals_disconnect_by_handle(data->interp);
298 tcl_signal_cleanup(data->interp); 298 tcl_signal_cleanup(data->interp);
299 Tcl_Release((ClientData)data->interp); 299 Tcl_Release((ClientData)data->interp);
300 Tcl_DeleteInterp(data->interp); 300 Tcl_DeleteInterp(data->interp);