Thu, 07 Aug 2008 01:41:44 +0000
Some cleanup and a couple leak fixes.
| 11118 | 1 | #include "module.h" |
| 2 | ||
|
15894
765ec644ac47
Perl fixes for s/gaim/purple/. This hasn't really been tested yet.
Daniel Atallah <datallah@pidgin.im>
parents:
15435
diff
changeset
|
3 | MODULE = Purple::Notify PACKAGE = Purple::Notify PREFIX = purple_notify_ |
| 11118 | 4 | PROTOTYPES: ENABLE |
| 5 | ||
|
16773
e1171eb45f07
Remove the const-c and const-xs stuff and replace it with real constants
Etan Reisner <deryni@pidgin.im>
parents:
15894
diff
changeset
|
6 | BOOT: |
|
e1171eb45f07
Remove the const-c and const-xs stuff and replace it with real constants
Etan Reisner <deryni@pidgin.im>
parents:
15894
diff
changeset
|
7 | { |
|
e1171eb45f07
Remove the const-c and const-xs stuff and replace it with real constants
Etan Reisner <deryni@pidgin.im>
parents:
15894
diff
changeset
|
8 | HV *type_stash = gv_stashpv("Purple::Notify::Type", 1); |
|
e1171eb45f07
Remove the const-c and const-xs stuff and replace it with real constants
Etan Reisner <deryni@pidgin.im>
parents:
15894
diff
changeset
|
9 | HV *msg_type_stash = gv_stashpv("Purple::Notify:Msg", 1); |
|
e1171eb45f07
Remove the const-c and const-xs stuff and replace it with real constants
Etan Reisner <deryni@pidgin.im>
parents:
15894
diff
changeset
|
10 | HV *user_info_stash = gv_stashpv("Purple::NotifyUserInfo::Type", 1); |
|
e1171eb45f07
Remove the const-c and const-xs stuff and replace it with real constants
Etan Reisner <deryni@pidgin.im>
parents:
15894
diff
changeset
|
11 | |
|
e1171eb45f07
Remove the const-c and const-xs stuff and replace it with real constants
Etan Reisner <deryni@pidgin.im>
parents:
15894
diff
changeset
|
12 | static const constiv *civ, type_const_iv[] = { |
|
e1171eb45f07
Remove the const-c and const-xs stuff and replace it with real constants
Etan Reisner <deryni@pidgin.im>
parents:
15894
diff
changeset
|
13 | #define const_iv(name) {#name, (IV)PURPLE_NOTIFY_##name} |
|
e1171eb45f07
Remove the const-c and const-xs stuff and replace it with real constants
Etan Reisner <deryni@pidgin.im>
parents:
15894
diff
changeset
|
14 | const_iv(MESSAGE), |
|
e1171eb45f07
Remove the const-c and const-xs stuff and replace it with real constants
Etan Reisner <deryni@pidgin.im>
parents:
15894
diff
changeset
|
15 | const_iv(EMAIL), |
|
e1171eb45f07
Remove the const-c and const-xs stuff and replace it with real constants
Etan Reisner <deryni@pidgin.im>
parents:
15894
diff
changeset
|
16 | const_iv(EMAILS), |
|
e1171eb45f07
Remove the const-c and const-xs stuff and replace it with real constants
Etan Reisner <deryni@pidgin.im>
parents:
15894
diff
changeset
|
17 | const_iv(FORMATTED), |
|
e1171eb45f07
Remove the const-c and const-xs stuff and replace it with real constants
Etan Reisner <deryni@pidgin.im>
parents:
15894
diff
changeset
|
18 | const_iv(SEARCHRESULTS), |
|
e1171eb45f07
Remove the const-c and const-xs stuff and replace it with real constants
Etan Reisner <deryni@pidgin.im>
parents:
15894
diff
changeset
|
19 | const_iv(USERINFO), |
|
e1171eb45f07
Remove the const-c and const-xs stuff and replace it with real constants
Etan Reisner <deryni@pidgin.im>
parents:
15894
diff
changeset
|
20 | const_iv(URI), |
|
e1171eb45f07
Remove the const-c and const-xs stuff and replace it with real constants
Etan Reisner <deryni@pidgin.im>
parents:
15894
diff
changeset
|
21 | }; |
|
e1171eb45f07
Remove the const-c and const-xs stuff and replace it with real constants
Etan Reisner <deryni@pidgin.im>
parents:
15894
diff
changeset
|
22 | static const constiv msg_type_const_iv[] = { |
|
e1171eb45f07
Remove the const-c and const-xs stuff and replace it with real constants
Etan Reisner <deryni@pidgin.im>
parents:
15894
diff
changeset
|
23 | #undef const_iv |
|
e1171eb45f07
Remove the const-c and const-xs stuff and replace it with real constants
Etan Reisner <deryni@pidgin.im>
parents:
15894
diff
changeset
|
24 | #define const_iv(name) {#name, (IV)PURPLE_NOTIFY_MSG_##name} |
|
e1171eb45f07
Remove the const-c and const-xs stuff and replace it with real constants
Etan Reisner <deryni@pidgin.im>
parents:
15894
diff
changeset
|
25 | const_iv(ERROR), |
|
e1171eb45f07
Remove the const-c and const-xs stuff and replace it with real constants
Etan Reisner <deryni@pidgin.im>
parents:
15894
diff
changeset
|
26 | const_iv(WARNING), |
|
e1171eb45f07
Remove the const-c and const-xs stuff and replace it with real constants
Etan Reisner <deryni@pidgin.im>
parents:
15894
diff
changeset
|
27 | const_iv(INFO), |
|
e1171eb45f07
Remove the const-c and const-xs stuff and replace it with real constants
Etan Reisner <deryni@pidgin.im>
parents:
15894
diff
changeset
|
28 | }; |
|
e1171eb45f07
Remove the const-c and const-xs stuff and replace it with real constants
Etan Reisner <deryni@pidgin.im>
parents:
15894
diff
changeset
|
29 | static const constiv user_info_const_iv[] = { |
|
e1171eb45f07
Remove the const-c and const-xs stuff and replace it with real constants
Etan Reisner <deryni@pidgin.im>
parents:
15894
diff
changeset
|
30 | #undef const_iv |
|
e1171eb45f07
Remove the const-c and const-xs stuff and replace it with real constants
Etan Reisner <deryni@pidgin.im>
parents:
15894
diff
changeset
|
31 | #define const_iv(name) {#name, (IV)PURPLE_NOTIFY_USER_INFO_ENTRY_##name} |
|
e1171eb45f07
Remove the const-c and const-xs stuff and replace it with real constants
Etan Reisner <deryni@pidgin.im>
parents:
15894
diff
changeset
|
32 | const_iv(PAIR), |
|
e1171eb45f07
Remove the const-c and const-xs stuff and replace it with real constants
Etan Reisner <deryni@pidgin.im>
parents:
15894
diff
changeset
|
33 | const_iv(SECTION_BREAK), |
|
e1171eb45f07
Remove the const-c and const-xs stuff and replace it with real constants
Etan Reisner <deryni@pidgin.im>
parents:
15894
diff
changeset
|
34 | const_iv(SECTION_HEADER), |
|
e1171eb45f07
Remove the const-c and const-xs stuff and replace it with real constants
Etan Reisner <deryni@pidgin.im>
parents:
15894
diff
changeset
|
35 | }; |
|
e1171eb45f07
Remove the const-c and const-xs stuff and replace it with real constants
Etan Reisner <deryni@pidgin.im>
parents:
15894
diff
changeset
|
36 | |
|
e1171eb45f07
Remove the const-c and const-xs stuff and replace it with real constants
Etan Reisner <deryni@pidgin.im>
parents:
15894
diff
changeset
|
37 | for (civ = type_const_iv + sizeof(type_const_iv) / sizeof(type_const_iv[0]); civ-- > type_const_iv; ) |
|
e1171eb45f07
Remove the const-c and const-xs stuff and replace it with real constants
Etan Reisner <deryni@pidgin.im>
parents:
15894
diff
changeset
|
38 | newCONSTSUB(type_stash, (char *)civ->name, newSViv(civ->iv)); |
|
e1171eb45f07
Remove the const-c and const-xs stuff and replace it with real constants
Etan Reisner <deryni@pidgin.im>
parents:
15894
diff
changeset
|
39 | |
|
e1171eb45f07
Remove the const-c and const-xs stuff and replace it with real constants
Etan Reisner <deryni@pidgin.im>
parents:
15894
diff
changeset
|
40 | for (civ = msg_type_const_iv + sizeof(msg_type_const_iv) / sizeof(msg_type_const_iv[0]); civ-- > msg_type_const_iv; ) |
|
e1171eb45f07
Remove the const-c and const-xs stuff and replace it with real constants
Etan Reisner <deryni@pidgin.im>
parents:
15894
diff
changeset
|
41 | newCONSTSUB(msg_type_stash, (char *)civ->name, newSViv(civ->iv)); |
|
e1171eb45f07
Remove the const-c and const-xs stuff and replace it with real constants
Etan Reisner <deryni@pidgin.im>
parents:
15894
diff
changeset
|
42 | |
|
e1171eb45f07
Remove the const-c and const-xs stuff and replace it with real constants
Etan Reisner <deryni@pidgin.im>
parents:
15894
diff
changeset
|
43 | for (civ = user_info_const_iv + sizeof(user_info_const_iv) / sizeof(user_info_const_iv[0]); civ-- > user_info_const_iv; ) |
|
e1171eb45f07
Remove the const-c and const-xs stuff and replace it with real constants
Etan Reisner <deryni@pidgin.im>
parents:
15894
diff
changeset
|
44 | newCONSTSUB(user_info_stash, (char *)civ->name, newSViv(civ->iv)); |
|
e1171eb45f07
Remove the const-c and const-xs stuff and replace it with real constants
Etan Reisner <deryni@pidgin.im>
parents:
15894
diff
changeset
|
45 | } |
|
e1171eb45f07
Remove the const-c and const-xs stuff and replace it with real constants
Etan Reisner <deryni@pidgin.im>
parents:
15894
diff
changeset
|
46 | |
| 12773 | 47 | void |
|
15894
765ec644ac47
Perl fixes for s/gaim/purple/. This hasn't really been tested yet.
Daniel Atallah <datallah@pidgin.im>
parents:
15435
diff
changeset
|
48 | purple_notify_close(type, ui_handle) |
|
765ec644ac47
Perl fixes for s/gaim/purple/. This hasn't really been tested yet.
Daniel Atallah <datallah@pidgin.im>
parents:
15435
diff
changeset
|
49 | Purple::NotifyType type |
| 12773 | 50 | void * ui_handle |
| 11118 | 51 | |
| 12773 | 52 | void |
|
15894
765ec644ac47
Perl fixes for s/gaim/purple/. This hasn't really been tested yet.
Daniel Atallah <datallah@pidgin.im>
parents:
15435
diff
changeset
|
53 | purple_notify_close_with_handle(handle) |
| 12773 | 54 | void * handle |
| 11118 | 55 | |
| 56 | void * | |
|
15894
765ec644ac47
Perl fixes for s/gaim/purple/. This hasn't really been tested yet.
Daniel Atallah <datallah@pidgin.im>
parents:
15435
diff
changeset
|
57 | purple_notify_email(handle, subject, from, to, url, cb, user_data) |
| 12773 | 58 | void * handle |
| 11118 | 59 | const char *subject |
| 60 | const char *from | |
| 61 | const char *to | |
| 62 | const char *url | |
|
15894
765ec644ac47
Perl fixes for s/gaim/purple/. This hasn't really been tested yet.
Daniel Atallah <datallah@pidgin.im>
parents:
15435
diff
changeset
|
63 | Purple::NotifyCloseCallback cb |
|
12242
e7fc1748eb56
[gaim-migrate @ 14544]
Richard Laager <rlaager@pidgin.im>
parents:
12235
diff
changeset
|
64 | gpointer user_data |
| 11118 | 65 | |
| 66 | void * | |
|
15894
765ec644ac47
Perl fixes for s/gaim/purple/. This hasn't really been tested yet.
Daniel Atallah <datallah@pidgin.im>
parents:
15435
diff
changeset
|
67 | purple_notify_emails(handle, count, detailed, subjects, froms, tos, urls, cb, user_data) |
| 12773 | 68 | void * handle |
| 11118 | 69 | size_t count |
| 70 | gboolean detailed | |
| 71 | const char **subjects | |
| 72 | const char **froms | |
| 73 | const char **tos | |
| 74 | const char **urls | |
|
15894
765ec644ac47
Perl fixes for s/gaim/purple/. This hasn't really been tested yet.
Daniel Atallah <datallah@pidgin.im>
parents:
15435
diff
changeset
|
75 | Purple::NotifyCloseCallback cb |
|
12242
e7fc1748eb56
[gaim-migrate @ 14544]
Richard Laager <rlaager@pidgin.im>
parents:
12235
diff
changeset
|
76 | gpointer user_data |
| 11118 | 77 | |
| 78 | void * | |
|
15894
765ec644ac47
Perl fixes for s/gaim/purple/. This hasn't really been tested yet.
Daniel Atallah <datallah@pidgin.im>
parents:
15435
diff
changeset
|
79 | purple_notify_formatted(handle, title, primary, secondary, text, cb, user_data) |
| 12773 | 80 | void * handle |
| 11118 | 81 | const char *title |
| 82 | const char *primary | |
| 83 | const char *secondary | |
| 84 | const char *text | |
|
15894
765ec644ac47
Perl fixes for s/gaim/purple/. This hasn't really been tested yet.
Daniel Atallah <datallah@pidgin.im>
parents:
15435
diff
changeset
|
85 | Purple::NotifyCloseCallback cb |
|
12242
e7fc1748eb56
[gaim-migrate @ 14544]
Richard Laager <rlaager@pidgin.im>
parents:
12235
diff
changeset
|
86 | gpointer user_data |
| 11118 | 87 | |
|
15266
a168574c18d2
[gaim-migrate @ 17994]
Daniel Atallah <datallah@pidgin.im>
parents:
14254
diff
changeset
|
88 | void * |
|
15894
765ec644ac47
Perl fixes for s/gaim/purple/. This hasn't really been tested yet.
Daniel Atallah <datallah@pidgin.im>
parents:
15435
diff
changeset
|
89 | purple_notify_userinfo(gc, who, user_info, cb, user_data) |
|
765ec644ac47
Perl fixes for s/gaim/purple/. This hasn't really been tested yet.
Daniel Atallah <datallah@pidgin.im>
parents:
15435
diff
changeset
|
90 | Purple::Connection gc |
|
15266
a168574c18d2
[gaim-migrate @ 17994]
Daniel Atallah <datallah@pidgin.im>
parents:
14254
diff
changeset
|
91 | const char *who |
|
15894
765ec644ac47
Perl fixes for s/gaim/purple/. This hasn't really been tested yet.
Daniel Atallah <datallah@pidgin.im>
parents:
15435
diff
changeset
|
92 | Purple::NotifyUserInfo user_info |
|
765ec644ac47
Perl fixes for s/gaim/purple/. This hasn't really been tested yet.
Daniel Atallah <datallah@pidgin.im>
parents:
15435
diff
changeset
|
93 | Purple::NotifyCloseCallback cb |
|
15266
a168574c18d2
[gaim-migrate @ 17994]
Daniel Atallah <datallah@pidgin.im>
parents:
14254
diff
changeset
|
94 | gpointer user_data |
|
a168574c18d2
[gaim-migrate @ 17994]
Daniel Atallah <datallah@pidgin.im>
parents:
14254
diff
changeset
|
95 | |
|
16774
064f0b6c87a5
Clean up a bunch of the perl api stuff. Eventually I'll dump the entire list
Etan Reisner <deryni@pidgin.im>
parents:
16773
diff
changeset
|
96 | Purple::NotifyUiOps |
|
064f0b6c87a5
Clean up a bunch of the perl api stuff. Eventually I'll dump the entire list
Etan Reisner <deryni@pidgin.im>
parents:
16773
diff
changeset
|
97 | purple_notify_get_ui_ops() |
|
064f0b6c87a5
Clean up a bunch of the perl api stuff. Eventually I'll dump the entire list
Etan Reisner <deryni@pidgin.im>
parents:
16773
diff
changeset
|
98 | |
|
064f0b6c87a5
Clean up a bunch of the perl api stuff. Eventually I'll dump the entire list
Etan Reisner <deryni@pidgin.im>
parents:
16773
diff
changeset
|
99 | void |
|
064f0b6c87a5
Clean up a bunch of the perl api stuff. Eventually I'll dump the entire list
Etan Reisner <deryni@pidgin.im>
parents:
16773
diff
changeset
|
100 | purple_notify_set_ui_ops(ops) |
|
064f0b6c87a5
Clean up a bunch of the perl api stuff. Eventually I'll dump the entire list
Etan Reisner <deryni@pidgin.im>
parents:
16773
diff
changeset
|
101 | Purple::NotifyUiOps ops |
|
064f0b6c87a5
Clean up a bunch of the perl api stuff. Eventually I'll dump the entire list
Etan Reisner <deryni@pidgin.im>
parents:
16773
diff
changeset
|
102 | |
|
064f0b6c87a5
Clean up a bunch of the perl api stuff. Eventually I'll dump the entire list
Etan Reisner <deryni@pidgin.im>
parents:
16773
diff
changeset
|
103 | void * |
|
064f0b6c87a5
Clean up a bunch of the perl api stuff. Eventually I'll dump the entire list
Etan Reisner <deryni@pidgin.im>
parents:
16773
diff
changeset
|
104 | purple_notify_message(handle, type, title, primary, secondary, cb, user_data) |
|
064f0b6c87a5
Clean up a bunch of the perl api stuff. Eventually I'll dump the entire list
Etan Reisner <deryni@pidgin.im>
parents:
16773
diff
changeset
|
105 | void * handle |
|
064f0b6c87a5
Clean up a bunch of the perl api stuff. Eventually I'll dump the entire list
Etan Reisner <deryni@pidgin.im>
parents:
16773
diff
changeset
|
106 | Purple::NotifyMsgType type |
|
064f0b6c87a5
Clean up a bunch of the perl api stuff. Eventually I'll dump the entire list
Etan Reisner <deryni@pidgin.im>
parents:
16773
diff
changeset
|
107 | const char *title |
|
064f0b6c87a5
Clean up a bunch of the perl api stuff. Eventually I'll dump the entire list
Etan Reisner <deryni@pidgin.im>
parents:
16773
diff
changeset
|
108 | const char *primary |
|
064f0b6c87a5
Clean up a bunch of the perl api stuff. Eventually I'll dump the entire list
Etan Reisner <deryni@pidgin.im>
parents:
16773
diff
changeset
|
109 | const char *secondary |
|
064f0b6c87a5
Clean up a bunch of the perl api stuff. Eventually I'll dump the entire list
Etan Reisner <deryni@pidgin.im>
parents:
16773
diff
changeset
|
110 | Purple::NotifyCloseCallback cb |
|
064f0b6c87a5
Clean up a bunch of the perl api stuff. Eventually I'll dump the entire list
Etan Reisner <deryni@pidgin.im>
parents:
16773
diff
changeset
|
111 | gpointer user_data |
|
064f0b6c87a5
Clean up a bunch of the perl api stuff. Eventually I'll dump the entire list
Etan Reisner <deryni@pidgin.im>
parents:
16773
diff
changeset
|
112 | |
|
064f0b6c87a5
Clean up a bunch of the perl api stuff. Eventually I'll dump the entire list
Etan Reisner <deryni@pidgin.im>
parents:
16773
diff
changeset
|
113 | void * |
|
064f0b6c87a5
Clean up a bunch of the perl api stuff. Eventually I'll dump the entire list
Etan Reisner <deryni@pidgin.im>
parents:
16773
diff
changeset
|
114 | purple_notify_searchresults(gc, title, primary, secondary, results, cb, user_data) |
|
064f0b6c87a5
Clean up a bunch of the perl api stuff. Eventually I'll dump the entire list
Etan Reisner <deryni@pidgin.im>
parents:
16773
diff
changeset
|
115 | Purple::Connection gc |
|
064f0b6c87a5
Clean up a bunch of the perl api stuff. Eventually I'll dump the entire list
Etan Reisner <deryni@pidgin.im>
parents:
16773
diff
changeset
|
116 | const char *title |
|
064f0b6c87a5
Clean up a bunch of the perl api stuff. Eventually I'll dump the entire list
Etan Reisner <deryni@pidgin.im>
parents:
16773
diff
changeset
|
117 | const char *primary |
|
064f0b6c87a5
Clean up a bunch of the perl api stuff. Eventually I'll dump the entire list
Etan Reisner <deryni@pidgin.im>
parents:
16773
diff
changeset
|
118 | const char *secondary |
|
064f0b6c87a5
Clean up a bunch of the perl api stuff. Eventually I'll dump the entire list
Etan Reisner <deryni@pidgin.im>
parents:
16773
diff
changeset
|
119 | Purple::NotifySearchResults results |
|
064f0b6c87a5
Clean up a bunch of the perl api stuff. Eventually I'll dump the entire list
Etan Reisner <deryni@pidgin.im>
parents:
16773
diff
changeset
|
120 | Purple::NotifyCloseCallback cb |
|
064f0b6c87a5
Clean up a bunch of the perl api stuff. Eventually I'll dump the entire list
Etan Reisner <deryni@pidgin.im>
parents:
16773
diff
changeset
|
121 | gpointer user_data |
|
064f0b6c87a5
Clean up a bunch of the perl api stuff. Eventually I'll dump the entire list
Etan Reisner <deryni@pidgin.im>
parents:
16773
diff
changeset
|
122 | |
|
064f0b6c87a5
Clean up a bunch of the perl api stuff. Eventually I'll dump the entire list
Etan Reisner <deryni@pidgin.im>
parents:
16773
diff
changeset
|
123 | void * |
|
064f0b6c87a5
Clean up a bunch of the perl api stuff. Eventually I'll dump the entire list
Etan Reisner <deryni@pidgin.im>
parents:
16773
diff
changeset
|
124 | purple_notify_uri(handle, uri) |
|
064f0b6c87a5
Clean up a bunch of the perl api stuff. Eventually I'll dump the entire list
Etan Reisner <deryni@pidgin.im>
parents:
16773
diff
changeset
|
125 | void * handle |
|
064f0b6c87a5
Clean up a bunch of the perl api stuff. Eventually I'll dump the entire list
Etan Reisner <deryni@pidgin.im>
parents:
16773
diff
changeset
|
126 | const char *uri |
|
064f0b6c87a5
Clean up a bunch of the perl api stuff. Eventually I'll dump the entire list
Etan Reisner <deryni@pidgin.im>
parents:
16773
diff
changeset
|
127 | |
|
064f0b6c87a5
Clean up a bunch of the perl api stuff. Eventually I'll dump the entire list
Etan Reisner <deryni@pidgin.im>
parents:
16773
diff
changeset
|
128 | MODULE = Purple::Notify PACKAGE = Purple::NotifyUserInfo PREFIX = purple_notify_user_info_ |
|
064f0b6c87a5
Clean up a bunch of the perl api stuff. Eventually I'll dump the entire list
Etan Reisner <deryni@pidgin.im>
parents:
16773
diff
changeset
|
129 | PROTOTYPES: ENABLE |
|
064f0b6c87a5
Clean up a bunch of the perl api stuff. Eventually I'll dump the entire list
Etan Reisner <deryni@pidgin.im>
parents:
16773
diff
changeset
|
130 | |
|
15894
765ec644ac47
Perl fixes for s/gaim/purple/. This hasn't really been tested yet.
Daniel Atallah <datallah@pidgin.im>
parents:
15435
diff
changeset
|
131 | Purple::NotifyUserInfo |
|
16774
064f0b6c87a5
Clean up a bunch of the perl api stuff. Eventually I'll dump the entire list
Etan Reisner <deryni@pidgin.im>
parents:
16773
diff
changeset
|
132 | purple_notify_user_info_new(class) |
|
064f0b6c87a5
Clean up a bunch of the perl api stuff. Eventually I'll dump the entire list
Etan Reisner <deryni@pidgin.im>
parents:
16773
diff
changeset
|
133 | C_ARGS: /* void */ |
|
15266
a168574c18d2
[gaim-migrate @ 17994]
Daniel Atallah <datallah@pidgin.im>
parents:
14254
diff
changeset
|
134 | |
|
a168574c18d2
[gaim-migrate @ 17994]
Daniel Atallah <datallah@pidgin.im>
parents:
14254
diff
changeset
|
135 | void |
|
15894
765ec644ac47
Perl fixes for s/gaim/purple/. This hasn't really been tested yet.
Daniel Atallah <datallah@pidgin.im>
parents:
15435
diff
changeset
|
136 | purple_notify_user_info_destroy(user_info) |
|
765ec644ac47
Perl fixes for s/gaim/purple/. This hasn't really been tested yet.
Daniel Atallah <datallah@pidgin.im>
parents:
15435
diff
changeset
|
137 | Purple::NotifyUserInfo user_info |
|
15266
a168574c18d2
[gaim-migrate @ 17994]
Daniel Atallah <datallah@pidgin.im>
parents:
14254
diff
changeset
|
138 | |
|
a168574c18d2
[gaim-migrate @ 17994]
Daniel Atallah <datallah@pidgin.im>
parents:
14254
diff
changeset
|
139 | void |
|
15894
765ec644ac47
Perl fixes for s/gaim/purple/. This hasn't really been tested yet.
Daniel Atallah <datallah@pidgin.im>
parents:
15435
diff
changeset
|
140 | purple_notify_user_info_get_entries(user_info) |
|
765ec644ac47
Perl fixes for s/gaim/purple/. This hasn't really been tested yet.
Daniel Atallah <datallah@pidgin.im>
parents:
15435
diff
changeset
|
141 | Purple::NotifyUserInfo user_info |
|
15266
a168574c18d2
[gaim-migrate @ 17994]
Daniel Atallah <datallah@pidgin.im>
parents:
14254
diff
changeset
|
142 | PREINIT: |
|
18190
bcf28ef7e8ff
Re-fix the DBus list handling code by killing const GList* / const GSList*
Richard Laager <rlaager@pidgin.im>
parents:
16774
diff
changeset
|
143 | GList *l; |
|
15266
a168574c18d2
[gaim-migrate @ 17994]
Daniel Atallah <datallah@pidgin.im>
parents:
14254
diff
changeset
|
144 | PPCODE: |
|
15894
765ec644ac47
Perl fixes for s/gaim/purple/. This hasn't really been tested yet.
Daniel Atallah <datallah@pidgin.im>
parents:
15435
diff
changeset
|
145 | l = purple_notify_user_info_get_entries(user_info); |
|
15266
a168574c18d2
[gaim-migrate @ 17994]
Daniel Atallah <datallah@pidgin.im>
parents:
14254
diff
changeset
|
146 | for (; l != NULL; l = l->next) { |
|
15894
765ec644ac47
Perl fixes for s/gaim/purple/. This hasn't really been tested yet.
Daniel Atallah <datallah@pidgin.im>
parents:
15435
diff
changeset
|
147 | XPUSHs(sv_2mortal(purple_perl_bless_object(l->data, "Purple::NotifyUserInfoEntry"))); |
|
15266
a168574c18d2
[gaim-migrate @ 17994]
Daniel Atallah <datallah@pidgin.im>
parents:
14254
diff
changeset
|
148 | } |
|
a168574c18d2
[gaim-migrate @ 17994]
Daniel Atallah <datallah@pidgin.im>
parents:
14254
diff
changeset
|
149 | |
|
a168574c18d2
[gaim-migrate @ 17994]
Daniel Atallah <datallah@pidgin.im>
parents:
14254
diff
changeset
|
150 | gchar_own * |
|
15894
765ec644ac47
Perl fixes for s/gaim/purple/. This hasn't really been tested yet.
Daniel Atallah <datallah@pidgin.im>
parents:
15435
diff
changeset
|
151 | purple_notify_user_info_get_text_with_newline(user_info, newline) |
|
765ec644ac47
Perl fixes for s/gaim/purple/. This hasn't really been tested yet.
Daniel Atallah <datallah@pidgin.im>
parents:
15435
diff
changeset
|
152 | Purple::NotifyUserInfo user_info |
|
15266
a168574c18d2
[gaim-migrate @ 17994]
Daniel Atallah <datallah@pidgin.im>
parents:
14254
diff
changeset
|
153 | const char *newline |
|
a168574c18d2
[gaim-migrate @ 17994]
Daniel Atallah <datallah@pidgin.im>
parents:
14254
diff
changeset
|
154 | |
|
15894
765ec644ac47
Perl fixes for s/gaim/purple/. This hasn't really been tested yet.
Daniel Atallah <datallah@pidgin.im>
parents:
15435
diff
changeset
|
155 | void purple_notify_user_info_add_pair(user_info, label, value) |
|
765ec644ac47
Perl fixes for s/gaim/purple/. This hasn't really been tested yet.
Daniel Atallah <datallah@pidgin.im>
parents:
15435
diff
changeset
|
156 | Purple::NotifyUserInfo user_info |
|
15266
a168574c18d2
[gaim-migrate @ 17994]
Daniel Atallah <datallah@pidgin.im>
parents:
14254
diff
changeset
|
157 | const char *label |
|
a168574c18d2
[gaim-migrate @ 17994]
Daniel Atallah <datallah@pidgin.im>
parents:
14254
diff
changeset
|
158 | const char *value |
|
a168574c18d2
[gaim-migrate @ 17994]
Daniel Atallah <datallah@pidgin.im>
parents:
14254
diff
changeset
|
159 | |
|
15894
765ec644ac47
Perl fixes for s/gaim/purple/. This hasn't really been tested yet.
Daniel Atallah <datallah@pidgin.im>
parents:
15435
diff
changeset
|
160 | void purple_notify_user_info_prepend_pair(user_info, label, value) |
|
765ec644ac47
Perl fixes for s/gaim/purple/. This hasn't really been tested yet.
Daniel Atallah <datallah@pidgin.im>
parents:
15435
diff
changeset
|
161 | Purple::NotifyUserInfo user_info |
|
15266
a168574c18d2
[gaim-migrate @ 17994]
Daniel Atallah <datallah@pidgin.im>
parents:
14254
diff
changeset
|
162 | const char *label |
|
a168574c18d2
[gaim-migrate @ 17994]
Daniel Atallah <datallah@pidgin.im>
parents:
14254
diff
changeset
|
163 | const char *value |
|
a168574c18d2
[gaim-migrate @ 17994]
Daniel Atallah <datallah@pidgin.im>
parents:
14254
diff
changeset
|
164 | |
|
15894
765ec644ac47
Perl fixes for s/gaim/purple/. This hasn't really been tested yet.
Daniel Atallah <datallah@pidgin.im>
parents:
15435
diff
changeset
|
165 | void purple_notify_user_info_add_section_break(user_info) |
|
765ec644ac47
Perl fixes for s/gaim/purple/. This hasn't really been tested yet.
Daniel Atallah <datallah@pidgin.im>
parents:
15435
diff
changeset
|
166 | Purple::NotifyUserInfo user_info |
|
15266
a168574c18d2
[gaim-migrate @ 17994]
Daniel Atallah <datallah@pidgin.im>
parents:
14254
diff
changeset
|
167 | |
|
15894
765ec644ac47
Perl fixes for s/gaim/purple/. This hasn't really been tested yet.
Daniel Atallah <datallah@pidgin.im>
parents:
15435
diff
changeset
|
168 | void purple_notify_user_info_add_section_header(user_info, label) |
|
765ec644ac47
Perl fixes for s/gaim/purple/. This hasn't really been tested yet.
Daniel Atallah <datallah@pidgin.im>
parents:
15435
diff
changeset
|
169 | Purple::NotifyUserInfo user_info |
|
15266
a168574c18d2
[gaim-migrate @ 17994]
Daniel Atallah <datallah@pidgin.im>
parents:
14254
diff
changeset
|
170 | const char *label |
|
a168574c18d2
[gaim-migrate @ 17994]
Daniel Atallah <datallah@pidgin.im>
parents:
14254
diff
changeset
|
171 | |
|
15894
765ec644ac47
Perl fixes for s/gaim/purple/. This hasn't really been tested yet.
Daniel Atallah <datallah@pidgin.im>
parents:
15435
diff
changeset
|
172 | void purple_notify_user_info_remove_last_item(user_info) |
|
765ec644ac47
Perl fixes for s/gaim/purple/. This hasn't really been tested yet.
Daniel Atallah <datallah@pidgin.im>
parents:
15435
diff
changeset
|
173 | Purple::NotifyUserInfo user_info |
|
15266
a168574c18d2
[gaim-migrate @ 17994]
Daniel Atallah <datallah@pidgin.im>
parents:
14254
diff
changeset
|
174 | |
|
22843
494d03e9a2fd
Shut up two compiler warnings about discarding qualifiers.
Etan Reisner <deryni@pidgin.im>
parents:
18190
diff
changeset
|
175 | const gchar * |
|
15894
765ec644ac47
Perl fixes for s/gaim/purple/. This hasn't really been tested yet.
Daniel Atallah <datallah@pidgin.im>
parents:
15435
diff
changeset
|
176 | purple_notify_user_info_entry_get_label(user_info_entry) |
|
765ec644ac47
Perl fixes for s/gaim/purple/. This hasn't really been tested yet.
Daniel Atallah <datallah@pidgin.im>
parents:
15435
diff
changeset
|
177 | Purple::NotifyUserInfoEntry user_info_entry |
|
15266
a168574c18d2
[gaim-migrate @ 17994]
Daniel Atallah <datallah@pidgin.im>
parents:
14254
diff
changeset
|
178 | |
|
22843
494d03e9a2fd
Shut up two compiler warnings about discarding qualifiers.
Etan Reisner <deryni@pidgin.im>
parents:
18190
diff
changeset
|
179 | const gchar * |
|
15894
765ec644ac47
Perl fixes for s/gaim/purple/. This hasn't really been tested yet.
Daniel Atallah <datallah@pidgin.im>
parents:
15435
diff
changeset
|
180 | purple_notify_user_info_entry_get_value(user_info_entry) |
|
765ec644ac47
Perl fixes for s/gaim/purple/. This hasn't really been tested yet.
Daniel Atallah <datallah@pidgin.im>
parents:
15435
diff
changeset
|
181 | Purple::NotifyUserInfoEntry user_info_entry |