# HG changeset patch # User Christian Hammond # Date 1065064038 0 # Node ID b14a7bc189b88a6dcb7a22b3883c23526ae82df4 # Parent af8befd878d7379ce710cf9334ab59aed4e3b401 [gaim-migrate @ 7687] Make perl compile. committer: Tailor Script diff -r af8befd878d7 -r b14a7bc189b8 plugins/perl/common/ConvWindow.xs --- a/plugins/perl/common/ConvWindow.xs Thu Oct 02 03:04:03 2003 +0000 +++ b/plugins/perl/common/ConvWindow.xs Thu Oct 02 03:07:18 2003 +0000 @@ -1,66 +1,66 @@ #include "module.h" -MODULE = Gaim::ConvWindow PACKAGE = Gaim::ConvWindow PREFIX = gaim_window_ +MODULE = Gaim::ConvWindow PACKAGE = Gaim::ConvWindow PREFIX = gaim_conv_window_ PROTOTYPES: ENABLE Gaim::ConvWindow -gaim_window_new() +gaim_conv_window_new() void DESTROY(win) Gaim::ConvWindow win CODE: - gaim_window_destroy(win); + gaim_conv_window_destroy(win); void -gaim_window_show(win) +gaim_conv_window_show(win) Gaim::ConvWindow win void -gaim_window_hide(win) +gaim_conv_window_hide(win) Gaim::ConvWindow win void -gaim_window_raise(win) +gaim_conv_window_raise(win) Gaim::ConvWindow win void -gaim_window_flash(win) +gaim_conv_window_flash(win) Gaim::ConvWindow win int -gaim_window_add_conversation(win, conv) +gaim_conv_window_add_conversation(win, conv) Gaim::ConvWindow win Gaim::Conversation conv Gaim::Conversation -gaim_window_remove_conversation(win, index) +gaim_conv_window_remove_conversation(win, index) Gaim::ConvWindow win unsigned int index void -gaim_window_move_conversation(win, index, new_index) +gaim_conv_window_move_conversation(win, index, new_index) Gaim::ConvWindow win unsigned int index unsigned int new_index Gaim::Conversation -gaim_window_get_conversation_at(win, index) +gaim_conv_window_get_conversation_at(win, index) Gaim::ConvWindow win unsigned int index size_t -gaim_window_get_conversation_count(win) +gaim_conv_window_get_conversation_count(win) Gaim::ConvWindow win void -gaim_window_switch_conversation(win, index) +gaim_conv_window_switch_conversation(win, index) Gaim::ConvWindow win unsigned int index Gaim::Conversation -gaim_window_get_active_conversation(win) +gaim_conv_window_get_active_conversation(win) Gaim::ConvWindow win void @@ -69,7 +69,7 @@ PREINIT: GList *l; CODE: - for (l = gaim_window_get_conversations(win); l != NULL; l = l->next) + for (l = gaim_conv_window_get_conversations(win); l != NULL; l = l->next) { XPUSHs(sv_2mortal(gaim_perl_bless_object(l->data, "Gaim::Conversation"))); diff -r af8befd878d7 -r b14a7bc189b8 plugins/perl/common/Conversation_Chat.xs --- a/plugins/perl/common/Conversation_Chat.xs Thu Oct 02 03:04:03 2003 +0000 +++ b/plugins/perl/common/Conversation_Chat.xs Thu Oct 02 03:07:18 2003 +0000 @@ -1,6 +1,6 @@ #include "module.h" -MODULE = Gaim::Conversation::Chat PACKAGE = Gaim::Conversation::Chat PREFIX = gaim_chat_ +MODULE = Gaim::Conversation::Chat PACKAGE = Gaim::Conversation::Chat PREFIX = gaim_conv_chat_ PROTOTYPES: ENABLE Gaim::Conversation::Chat @@ -8,7 +8,7 @@ Gaim::Account account const char *name CODE: - RETVAL = GAIM_CHAT(gaim_conversation_new(GAIM_CONV_CHAT, account, name)); + RETVAL = GAIM_CONV_CHAT(gaim_conversation_new(GAIM_CONV_CHAT, account, name)); OUTPUT: RETVAL @@ -16,11 +16,11 @@ DESTROY(chat) Gaim::Conversation::Chat chat CODE: - gaim_conversation_destroy(gaim_chat_get_conversation(chat)); + gaim_conversation_destroy(gaim_conv_chat_get_conversation(chat)); Gaim::Conversation -gaim_chat_get_conversation(chat) +gaim_conv_chat_get_conversation(chat) Gaim::Conversation::Chat chat void @@ -29,18 +29,18 @@ PREINIT: GList *l; PPCODE: - for (l = gaim_chat_get_users(chat); l != NULL; l = l->next) + for (l = gaim_conv_chat_get_users(chat); l != NULL; l = l->next) { XPUSHs(sv_2mortal(newSVpv(l->data, 0))); } void -gaim_chat_ignore(chat, name) +gaim_conv_chat_ignore(chat, name) Gaim::Conversation::Chat chat const char *name void -gaim_chat_unignore(chat, name) +gaim_conv_chat_unignore(chat, name) Gaim::Conversation::Chat chat const char *name @@ -50,28 +50,28 @@ PREINIT: GList *l; PPCODE: - for (l = gaim_chat_get_ignored(chat); l != NULL; l = l->next) + for (l = gaim_conv_chat_get_ignored(chat); l != NULL; l = l->next) { XPUSHs(sv_2mortal(newSVpv(l->data, 0))); } gboolean -gaim_chat_is_user_ignored(chat, user) +gaim_conv_chat_is_user_ignored(chat, user) Gaim::Conversation::Chat chat const char *user void -gaim_chat_set_topic(chat, who, topic) +gaim_conv_chat_set_topic(chat, who, topic) Gaim::Conversation::Chat chat const char *who const char *topic const char * -gaim_chat_get_topic(chat) +gaim_conv_chat_get_topic(chat) Gaim::Conversation::Chat chat int -gaim_chat_get_id(chat) +gaim_conv_chat_get_id(chat) Gaim::Conversation::Chat chat void @@ -81,10 +81,10 @@ const char *message int flags CODE: - gaim_chat_write(chat, who, message, flags, time(NULL)); + gaim_conv_chat_write(chat, who, message, flags, time(NULL)); void -gaim_chat_send(chat, message) +gaim_conv_chat_send(chat, message) Gaim::Conversation::Chat chat const char *message diff -r af8befd878d7 -r b14a7bc189b8 plugins/perl/common/Conversation_IM.xs --- a/plugins/perl/common/Conversation_IM.xs Thu Oct 02 03:04:03 2003 +0000 +++ b/plugins/perl/common/Conversation_IM.xs Thu Oct 02 03:07:18 2003 +0000 @@ -1,6 +1,6 @@ #include "module.h" -MODULE = Gaim::Conversation::IM PACKAGE = Gaim::Conversation::IM PREFIX = gaim_im_ +MODULE = Gaim::Conversation::IM PACKAGE = Gaim::Conversation::IM PREFIX = gaim_conv_im_ PROTOTYPES: ENABLE Gaim::Conversation::IM @@ -8,7 +8,7 @@ Gaim::Account account const char *name CODE: - RETVAL = GAIM_IM(gaim_conversation_new(GAIM_CONV_IM, account, name)); + RETVAL = GAIM_CONV_IM(gaim_conversation_new(GAIM_CONV_IM, account, name)); OUTPUT: RETVAL @@ -16,24 +16,24 @@ DESTROY(im) Gaim::Conversation::IM im CODE: - gaim_conversation_destroy(gaim_im_get_conversation(im)); + gaim_conversation_destroy(gaim_conv_im_get_conversation(im)); Gaim::Conversation -gaim_im_get_conversation(im) +gaim_conv_im_get_conversation(im) Gaim::Conversation::IM im void -gaim_im_write(im, who, message, flags) +gaim_conv_im_write(im, who, message, flags) Gaim::Conversation::IM im const char *who const char *message int flags CODE: - gaim_im_write(im, who, message, flags, time(NULL)); + gaim_conv_im_write(im, who, message, flags, time(NULL)); void -gaim_im_send(im, message) +gaim_conv_im_send(im, message) Gaim::Conversation::IM im const char *message @@ -48,6 +48,6 @@ PPCODE: for (l = gaim_get_ims(); l != NULL; l = l->next) { - XPUSHs(sv_2mortal(gaim_perl_bless_object(GAIM_IM(l->data), + XPUSHs(sv_2mortal(gaim_perl_bless_object(GAIM_CONV_IM(l->data), "Gaim::Conversation"))); }