| 138 instance handle to a callback on the plugin handle. This is best |
138 instance handle to a callback on the plugin handle. This is best |
| 139 illustrated with an example. |
139 illustrated with an example. |
| 140 |
140 |
| 141 |
141 |
| 142 @code |
142 @code |
| 143 sub connection_signed_on_cb { |
143 sub signed_on_cb { |
| 144 my ($gc, $data) = @_; |
144 my ($gc, $data) = @_; |
| 145 my $account = $gc->get_account(); |
145 my $account = $gc->get_account(); |
| 146 |
146 |
| 147 Gaim::debug_info("my perl plugin", |
147 Gaim::debug_info("my perl plugin", |
| 148 "Account " . $account->get_username() . " signed on.\n"); |
148 "Account " . $account->get_username() . " signed on.\n"); |