comparison: src/perl.c
src/perl.c
- changeset 3572
- d07e14aa6f26
- parent 3563
- ea2789c8077c
- child 3573
- 1a8a5cba7944
equal
deleted
inserted
replaced
| 3571:406912b64d12 | 3572:d07e14aa6f26 |
|---|---|
| 548 break; | 548 break; |
| 549 case 7: | 549 case 7: |
| 550 { | 550 { |
| 551 struct gaim_connection *gc = (struct gaim_connection *)SvIV(ST(1)); | 551 struct gaim_connection *gc = (struct gaim_connection *)SvIV(ST(1)); |
| 552 if (g_slist_find(connections, gc)) | 552 if (g_slist_find(connections, gc)) |
| 553 XST_mPV(i++, gc->prpl->name()); | 553 XST_mPV(i++, gc->prpl->name); |
| 554 else | 554 else |
| 555 XST_mPV(i++, "Unknown"); | 555 XST_mPV(i++, "Unknown"); |
| 556 } | 556 } |
| 557 break; | 557 break; |
| 558 default: | 558 default: |
