Mercurial > pidgin

comparison libpurple/plugins/perl/common/Conversation.xs @ 18058:4ca97b26a8fb

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Mark the return type const for the following functions. I noticed this while fixing some DBus stuff which I'll commit shortly. * purple_accounts_get_all * purple_connections_get_all * purple_connections_get_connecting * purple_conv_chat_get_ignored * purple_conv_chat_get_users * purple_get_chats * purple_get_conversations * purple_get_ims * purple_notify_user_info_get_entries References #1344
author Richard Laager <rlaager@wiktel.com>
date Thu, 07 Jun 2007 04:22:42 +0000
parents 1724f68245af
children 926ccb104da0
comparison
equal deleted inserted replaced
18057:23b03396e71e 18058:4ca97b26a8fb
91 } 91 }
92 92
93 void 93 void
94 purple_get_ims() 94 purple_get_ims()
95 PREINIT: 95 PREINIT:
96 GList *l; 96 const GList *l;
97 PPCODE: 97 PPCODE:
98 for (l = purple_get_ims(); l != NULL; l = l->next) { 98 for (l = purple_get_ims(); l != NULL; l = l->next) {
99 XPUSHs(sv_2mortal(purple_perl_bless_object(l->data, "Purple::Conversation"))); 99 XPUSHs(sv_2mortal(purple_perl_bless_object(l->data, "Purple::Conversation")));
100 } 100 }
101 101
102 void 102 void
103 purple_get_conversations() 103 purple_get_conversations()
104 PREINIT: 104 PREINIT:
105 GList *l; 105 const GList *l;
106 PPCODE: 106 PPCODE:
107 for (l = purple_get_conversations(); l != NULL; l = l->next) { 107 for (l = purple_get_conversations(); l != NULL; l = l->next) {
108 XPUSHs(sv_2mortal(purple_perl_bless_object(l->data, "Purple::Conversation"))); 108 XPUSHs(sv_2mortal(purple_perl_bless_object(l->data, "Purple::Conversation")));
109 } 109 }
110 110
111 void 111 void
112 purple_get_chats() 112 purple_get_chats()
113 PREINIT: 113 PREINIT:
114 GList *l; 114 const GList *l;
115 PPCODE: 115 PPCODE:
116 for (l = purple_get_chats(); l != NULL; l = l->next) { 116 for (l = purple_get_chats(); l != NULL; l = l->next) {
117 XPUSHs(sv_2mortal(purple_perl_bless_object(l->data, "Purple::Conversation"))); 117 XPUSHs(sv_2mortal(purple_perl_bless_object(l->data, "Purple::Conversation")));
118 } 118 }
119 119
352 352
353 void 353 void
354 purple_conv_chat_get_users(chat) 354 purple_conv_chat_get_users(chat)
355 Purple::Conversation::Chat chat 355 Purple::Conversation::Chat chat
356 PREINIT: 356 PREINIT:
357 GList *l; 357 const GList *l;
358 PPCODE: 358 PPCODE:
359 for (l = purple_conv_chat_get_users(chat); l != NULL; l = l->next) { 359 for (l = purple_conv_chat_get_users(chat); l != NULL; l = l->next) {
360 XPUSHs(sv_2mortal(purple_perl_bless_object(l->data, "Purple::ListEntry"))); 360 XPUSHs(sv_2mortal(purple_perl_bless_object(l->data, "Purple::ListEntry")));
361 } 361 }
362 362
392 392
393 void 393 void
394 purple_conv_chat_get_ignored(chat) 394 purple_conv_chat_get_ignored(chat)
395 Purple::Conversation::Chat chat 395 Purple::Conversation::Chat chat
396 PREINIT: 396 PREINIT:
397 GList *l; 397 const GList *l;
398 PPCODE: 398 PPCODE:
399 for (l = purple_conv_chat_get_ignored(chat); l != NULL; l = l->next) { 399 for (l = purple_conv_chat_get_ignored(chat); l != NULL; l = l->next) {
400 XPUSHs(sv_2mortal(purple_perl_bless_object(l->data, "Purple::ListEntry"))); 400 XPUSHs(sv_2mortal(purple_perl_bless_object(l->data, "Purple::ListEntry")));
401 } 401 }
402 402