Mercurial > pidgin
comparison plugins/perl/perl.c @ 9943:f8e395a054e2
[gaim-migrate @ 10835]
this all seemed to work last night...hopefully no stray cosmic rays did anything to break it since then
committer: Tailor Script <tailor@pidgin.im>
author | Nathan Walp <nwalp@pidgin.im> |
---|---|
date | Fri, 03 Sep 2004 21:21:25 +0000 |
parents | 7cd7da72c872 |
children | 50224ac8184d |
comparison
equal
deleted
inserted
replaced
9942:3941c39ccff5 | 9943:f8e395a054e2 |
---|---|
87 #endif | 87 #endif |
88 #include "internal.h" | 88 #include "internal.h" |
89 #include "debug.h" | 89 #include "debug.h" |
90 #include "plugin.h" | 90 #include "plugin.h" |
91 #include "signals.h" | 91 #include "signals.h" |
92 #include "version.h" | |
92 | 93 |
93 #include "perl-common.h" | 94 #include "perl-common.h" |
94 #include "perl-handlers.h" | 95 #include "perl-handlers.h" |
95 | 96 |
96 #define PERL_PLUGIN_ID "core-perl" | 97 #define PERL_PLUGIN_ID "core-perl" |
287 gaim_debug(GAIM_DEBUG_INFO, "perl", "Found plugin info\n"); | 288 gaim_debug(GAIM_DEBUG_INFO, "perl", "Found plugin info\n"); |
288 | 289 |
289 info = g_new0(GaimPluginInfo, 1); | 290 info = g_new0(GaimPluginInfo, 1); |
290 gps = g_new0(GaimPerlScript, 1); | 291 gps = g_new0(GaimPerlScript, 1); |
291 | 292 |
292 info->api_version = GAIM_PLUGIN_API_VERSION; | 293 info->magic = GAIM_PLUGIN_MAGIC; |
294 info->major_version = GAIM_MAJOR_VERSION; | |
295 info->minor_version = GAIM_MINOR_VERSION; | |
293 info->type = GAIM_PLUGIN_STANDARD; | 296 info->type = GAIM_PLUGIN_STANDARD; |
294 | 297 |
295 info->dependencies = g_list_append(info->dependencies, | 298 info->dependencies = g_list_append(info->dependencies, |
296 PERL_PLUGIN_ID); | 299 PERL_PLUGIN_ID); |
297 | 300 |
508 return TRUE; | 511 return TRUE; |
509 } | 512 } |
510 | 513 |
511 static GaimPluginLoaderInfo loader_info = | 514 static GaimPluginLoaderInfo loader_info = |
512 { | 515 { |
513 GAIM_LOADER_API_VERSION, /**< api_version */ | |
514 NULL, /**< exts */ | 516 NULL, /**< exts */ |
515 | |
516 probe_perl_plugin, /**< probe */ | 517 probe_perl_plugin, /**< probe */ |
517 load_perl_plugin, /**< load */ | 518 load_perl_plugin, /**< load */ |
518 unload_perl_plugin, /**< unload */ | 519 unload_perl_plugin, /**< unload */ |
519 destroy_perl_plugin /**< destroy */ | 520 destroy_perl_plugin /**< destroy */ |
520 }; | 521 }; |
521 | 522 |
522 static GaimPluginInfo info = | 523 static GaimPluginInfo info = |
523 { | 524 { |
524 GAIM_PLUGIN_API_VERSION, /**< api_version */ | 525 GAIM_PLUGIN_MAGIC, |
526 GAIM_MAJOR_VERSION, | |
527 GAIM_MINOR_VERSION, | |
525 GAIM_PLUGIN_LOADER, /**< type */ | 528 GAIM_PLUGIN_LOADER, /**< type */ |
526 NULL, /**< ui_requirement */ | 529 NULL, /**< ui_requirement */ |
527 0, /**< flags */ | 530 0, /**< flags */ |
528 NULL, /**< dependencies */ | 531 NULL, /**< dependencies */ |
529 GAIM_PRIORITY_DEFAULT, /**< priority */ | 532 GAIM_PRIORITY_DEFAULT, /**< priority */ |