Mercurial > pidgin.yaz
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 */ |