diff plugins/tcl/tcl.c @ 8117:e280d73ed07f

[gaim-migrate @ 8821] Since Gaim now shows plugin descriptions, this alters the Tcl API to collect them at registration time. NOTE THAT THIS CHANGES THE TCL API. Not that anyone uses it, but now I won't forget. Plugin registration will have to be changed in existing plugins, and a summary added ... see the appropriate part of the TCL-HOWTO for details. committer: Tailor Script <tailor@pidgin.im>
author Ethan Blanton <elb@pidgin.im>
date Thu, 15 Jan 2004 23:11:46 +0000
parents 409f7f167c98
children d7b8eb1f0a18
line wrap: on
line diff
--- a/plugins/tcl/tcl.c	Thu Jan 15 23:02:19 2004 +0000
+++ b/plugins/tcl/tcl.c	Thu Jan 15 23:11:46 2004 +0000
@@ -209,7 +209,7 @@
 		if (Tcl_EvalEx(interp, "plugin_init", -1, TCL_EVAL_GLOBAL) == TCL_OK) {
 			result = Tcl_GetObjResult(interp);
 			if (Tcl_ListObjGetElements(interp, result, &nelems, &listitems) == TCL_OK) {
-				if (nelems == 5) {
+				if (nelems == 6) {
 					info = g_new0(GaimPluginInfo, 1);
 					
 					info->api_version = 2;
@@ -218,9 +218,10 @@
 					
 					info->name = g_strdup(Tcl_GetString(listitems[0]));
 					info->version = g_strdup(Tcl_GetString(listitems[1]));
-					info->description = g_strdup(Tcl_GetString(listitems[2]));;
-					info->author = g_strdup(Tcl_GetString(listitems[3]));
-					info->homepage = g_strdup(Tcl_GetString(listitems[4]));
+					info->summary = g_strdup(Tcl_GetString(listitems[2]));
+					info->description = g_strdup(Tcl_GetString(listitems[3]));;
+					info->author = g_strdup(Tcl_GetString(listitems[5]));
+					info->homepage = g_strdup(Tcl_GetString(listitems[5]));
 					
 					plugin->info = info;