changeset 12891:a58540b16f41

[gaim-migrate @ 15244] Add some subtypes to gaim_perl_sv_from_subtype. committer: Tailor Script <tailor@pidgin.im>
author Etan Reisner <pidgin@unreliablesource.net>
date Mon, 16 Jan 2006 10:17:17 +0000
parents e0629444c455
children 3ab3e68df807
files plugins/perl/perl-common.c
diffstat 1 files changed, 15 insertions(+), 0 deletions(-) [+]
line wrap: on
line diff
--- 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"; /* ? */