comparison: pidgin/plugins/perl/common/GtkIMHtml.xs
pidgin/plugins/perl/common/GtkIMHtml.xs
- changeset 25122
- 56e73606e2b2
- parent 25107
- bd102c539600
- parent 25112
- 4e9dba9e28e6
- child 32295
- 5308ecfcf029
- child 32438
- dc8991868906
- child 35992
- 34a67264df99
equal
deleted
inserted
replaced
| 25121:c36026e6d6a9 | 25122:56e73606e2b2 |
|---|---|
| 169 PREINIT: | 169 PREINIT: |
| 170 GSList *t_GL; | 170 GSList *t_GL; |
| 171 int i, t_len; | 171 int i, t_len; |
| 172 PPCODE: | 172 PPCODE: |
| 173 t_GL = NULL; | 173 t_GL = NULL; |
| 174 t_len = av_len((AV *)SvRV(unused)) + 1; | 174 t_len = av_len((AV *)SvRV(unused)); |
| 175 | 175 |
| 176 for (i = 0; i <= t_len; i++) { | 176 for (i = 0; i <= t_len; i++) { |
| 177 STRLEN t_sl; | 177 STRLEN t_sl; |
| 178 t_GL = g_slist_append(t_GL, SvPV(*av_fetch((AV *)SvRV(unused), i, 0), t_sl)); | 178 t_GL = g_slist_append(t_GL, SvPV(*av_fetch((AV *)SvRV(unused), i, 0), t_sl)); |
| 179 } | 179 } |
