# HG changeset patch
# User Etan Reisner <pidgin@unreliablesource.net>
# Date 1136793851 0
# Node ID 4cf2094256b0ff47dd383bdfb988bf5e6a49a335
# Parent  239c2cd3b3a676af81ed553a980717f35584966a
[gaim-migrate @ 15135]
Whitespace, add a couple useful functions, and fix a couple functions so the objects they return are classed correctly so as to be a bit more useful.

committer: Tailor Script <tailor@pidgin.im>

diff -r 239c2cd3b3a6 -r 4cf2094256b0 plugins/perl/common/Plugin.xs
--- a/plugins/perl/common/Plugin.xs	Mon Jan 09 08:00:31 2006 +0000
+++ b/plugins/perl/common/Plugin.xs	Mon Jan 09 08:04:11 2006 +0000
@@ -3,24 +3,28 @@
 MODULE = Gaim::Plugin  PACKAGE = Gaim::Plugin  PREFIX = gaim_plugin_
 PROTOTYPES: ENABLE
 
-void 
+void
 gaim_plugin_destroy(plugin)
 	Gaim::Plugin plugin
 
-void 
+void
 gaim_plugin_ipc_unregister(plugin, command)
 	Gaim::Plugin plugin
 	const char *command
 
-void 
+void
 gaim_plugin_ipc_unregister_all(plugin)
 	Gaim::Plugin plugin
 
-gboolean 
+gboolean
 gaim_plugin_is_loaded(plugin)
 	Gaim::Plugin plugin
 
-gboolean 
+gboolean
+gaim_plugin_is_unloadable(plugin)
+	Gaim::Plugin plugin
+
+gboolean
 gaim_plugin_load(plugin)
 	Gaim::Plugin plugin
 
@@ -33,36 +37,58 @@
 gaim_plugin_probe(filename)
 	const char *filename
 
-gboolean 
+gboolean
 gaim_plugin_register(plugin)
 	Gaim::Plugin plugin
 
-gboolean 
+gboolean
 gaim_plugin_reload(plugin)
 	Gaim::Plugin plugin
 
-gboolean 
+gboolean
 gaim_plugin_unload(plugin)
 	Gaim::Plugin plugin
 
+const gchar *
+gaim_plugin_get_id(plugin)
+	Gaim::Plugin plugin
 
+const gchar *
+gaim_plugin_get_name(plugin)
+	Gaim::Plugin plugin
 
+const gchar *
+gaim_plugin_get_version(plugin)
+	Gaim::Plugin plugin
+
+const gchar *
+gaim_plugin_get_summary(plugin)
+	Gaim::Plugin plugin
+
+const gchar *
+gaim_plugin_get_description(plugin)
+	Gaim::Plugin plugin
+
+const gchar *
+gaim_plugin_get_author(plugin)
+	Gaim::Plugin plugin
+
+const gchar *
+gaim_plugin_get_homepage(plugin)
+	Gaim::Plugin plugin
 
 MODULE = Gaim::Plugin  PACKAGE = Gaim::Plugins  PREFIX = gaim_plugins_
 PROTOTYPES: ENABLE
 
-
-void 
+void
 gaim_plugins_add_search_path(path)
 	const char *path
 
-void 
+void
 gaim_plugins_destroy_all()
- 
 
-gboolean 
+gboolean
 gaim_plugins_enabled()
- 
 
 Gaim::Plugin
 gaim_plugins_find_with_basename(basename)
@@ -83,53 +109,46 @@
 void
 gaim_plugins_get_all()
 PREINIT:
-        GList *l;
+	GList *l;
 PPCODE:
-        for (l = gaim_plugins_get_all(); l != NULL; l = l->next) {
-                XPUSHs(sv_2mortal(gaim_perl_bless_object(l->data, "Gaim::PTR")));
-        }
- 
+	for (l = gaim_plugins_get_all(); l != NULL; l = l->next) {
+		XPUSHs(sv_2mortal(gaim_perl_bless_object(l->data, "Gaim::Plugin")));
+	}
 
 void *
 gaim_plugins_get_handle()
- 
 
 void
 gaim_plugins_get_loaded()
 PREINIT:
-        GList *l;
+	GList *l;
 PPCODE:
-        for (l = gaim_plugins_get_loaded(); l != NULL; l = l->next) {
-                XPUSHs(sv_2mortal(gaim_perl_bless_object(l->data, "Gaim::PTR")));
-        }
- 
+	for (l = gaim_plugins_get_loaded(); l != NULL; l = l->next) {
+		XPUSHs(sv_2mortal(gaim_perl_bless_object(l->data, "Gaim::Plugin")));
+	}
 
 void
 gaim_plugins_get_protocols()
 PREINIT:
-        GList *l;
+	GList *l;
 PPCODE:
-        for (l = gaim_plugins_get_protocols(); l != NULL; l = l->next) {
-                XPUSHs(sv_2mortal(gaim_perl_bless_object(l->data, "Gaim::PTR")));
-        }
- 
+	for (l = gaim_plugins_get_protocols(); l != NULL; l = l->next) {
+		XPUSHs(sv_2mortal(gaim_perl_bless_object(l->data, "Gaim::Plugin")));
+	}
 
-void 
+void
 gaim_plugins_init()
- 
 
-void 
+void
 gaim_plugins_load_saved(key)
 	const char *key
 
-void 
+void
 gaim_plugins_probe(ext)
 	const char *ext
 
-void 
+void
 gaim_plugins_uninit()
- 
 
-void 
+void
 gaim_plugins_unload_all()
-