Mon, 16 Jan 2006 10:17:17 +0000
[gaim-migrate @ 15244]
Add some subtypes to gaim_perl_sv_from_subtype.
| plugins/perl/perl-common.c | file | annotate | diff | comparison | revisions |
--- a/plugins/perl/perl-common.c Mon Jan 16 09:30:11 2006 +0000 +++ b/plugins/perl/perl-common.c Mon Jan 16 10:17:17 2006 +0000 @@ -420,6 +420,9 @@ case GAIM_SUBTYPE_BLIST_CHAT: stash = "Gaim::BuddyList::Chat"; break; + case GAIM_SUBTYPE_BUDDY_ICON: + stash = "Gaim::Buddy::Icon"; + break; case GAIM_SUBTYPE_CONNECTION: stash = "Gaim::Connection"; break; @@ -429,6 +432,18 @@ case GAIM_SUBTYPE_PLUGIN: stash = "Gaim::Plugin"; break; + case GAIM_SUBTYPE_BLIST_NODE: + stash = "Gaim::BuddtList::Node"; + break; + case GAIM_SUBTYPE_CIPHER: + stash = "Gaim::Cipher"; + break; + case GAIM_SUBTYPE_STATUS: + stash = "Gaim::Status"; + break; + case GAIM_SUBTYPE_LOG: + stash = "Gaim::Log"; + break; default: stash = "Gaim"; /* ? */