comparison: plugins/perl/common/Conversation_IM.xs
plugins/perl/common/Conversation_IM.xs
- changeset 7120
- 83dba78f8518
- parent 6982
- 12f08de92674
equal
deleted
inserted
replaced
| 7119:4a2b0f251cfa | 7120:83dba78f8518 |
|---|---|
| 1 #include "module.h" | 1 #include "module.h" |
| 2 | 2 |
| 3 MODULE = Gaim::Conversation::IM PACKAGE = Gaim::Conversation::IM PREFIX = gaim_im_ | 3 MODULE = Gaim::Conversation::IM PACKAGE = Gaim::Conversation::IM PREFIX = gaim_conv_im_ |
| 4 PROTOTYPES: ENABLE | 4 PROTOTYPES: ENABLE |
| 5 | 5 |
| 6 Gaim::Conversation::IM | 6 Gaim::Conversation::IM |
| 7 new(account, name) | 7 new(account, name) |
| 8 Gaim::Account account | 8 Gaim::Account account |
| 9 const char *name | 9 const char *name |
| 10 CODE: | 10 CODE: |
| 11 RETVAL = GAIM_IM(gaim_conversation_new(GAIM_CONV_IM, account, name)); | 11 RETVAL = GAIM_CONV_IM(gaim_conversation_new(GAIM_CONV_IM, account, name)); |
| 12 OUTPUT: | 12 OUTPUT: |
| 13 RETVAL | 13 RETVAL |
| 14 | 14 |
| 15 void | 15 void |
| 16 DESTROY(im) | 16 DESTROY(im) |
| 17 Gaim::Conversation::IM im | 17 Gaim::Conversation::IM im |
| 18 CODE: | 18 CODE: |
| 19 gaim_conversation_destroy(gaim_im_get_conversation(im)); | 19 gaim_conversation_destroy(gaim_conv_im_get_conversation(im)); |
| 20 | 20 |
| 21 | 21 |
| 22 Gaim::Conversation | 22 Gaim::Conversation |
| 23 gaim_im_get_conversation(im) | 23 gaim_conv_im_get_conversation(im) |
| 24 Gaim::Conversation::IM im | 24 Gaim::Conversation::IM im |
| 25 | 25 |
| 26 void | 26 void |
| 27 gaim_im_write(im, who, message, flags) | 27 gaim_conv_im_write(im, who, message, flags) |
| 28 Gaim::Conversation::IM im | 28 Gaim::Conversation::IM im |
| 29 const char *who | 29 const char *who |
| 30 const char *message | 30 const char *message |
| 31 int flags | 31 int flags |
| 32 CODE: | 32 CODE: |
| 33 gaim_im_write(im, who, message, flags, time(NULL)); | 33 gaim_conv_im_write(im, who, message, flags, time(NULL)); |
| 34 | 34 |
| 35 void | 35 void |
| 36 gaim_im_send(im, message) | 36 gaim_conv_im_send(im, message) |
| 37 Gaim::Conversation::IM im | 37 Gaim::Conversation::IM im |
| 38 const char *message | 38 const char *message |
| 39 | 39 |
| 40 | 40 |
| 41 MODULE = Gaim::Conversation::IM PACKAGE = Gaim PREFIX = gaim_ | 41 MODULE = Gaim::Conversation::IM PACKAGE = Gaim PREFIX = gaim_ |
| 46 PREINIT: | 46 PREINIT: |
| 47 GList *l; | 47 GList *l; |
| 48 PPCODE: | 48 PPCODE: |
| 49 for (l = gaim_get_ims(); l != NULL; l = l->next) | 49 for (l = gaim_get_ims(); l != NULL; l = l->next) |
| 50 { | 50 { |
| 51 XPUSHs(sv_2mortal(gaim_perl_bless_object(GAIM_IM(l->data), | 51 XPUSHs(sv_2mortal(gaim_perl_bless_object(GAIM_CONV_IM(l->data), |
| 52 "Gaim::Conversation"))); | 52 "Gaim::Conversation"))); |
| 53 } | 53 } |
