diff -r 2278a06da7c4 -r 36db35a9da56 plugins/perl/common/Plugin.xs
--- /dev/null	Thu Jan 01 00:00:00 1970 +0000
+++ b/plugins/perl/common/Plugin.xs	Mon Jul 18 13:37:38 2005 +0000
@@ -0,0 +1,136 @@
+#include "module.h"
+
+MODULE = Gaim::Plugin  PACKAGE = Gaim::Plugin  PREFIX = gaim_plugin_
+PROTOTYPES: ENABLE
+
+
+void 
+gaim_plugin_destroy(plugin)
+	Gaim::Plugin plugin
+
+void 
+gaim_plugin_ipc_unregister(plugin, command)
+	Gaim::Plugin plugin
+	const char *command
+
+void 
+gaim_plugin_ipc_unregister_all(plugin)
+	Gaim::Plugin plugin
+
+gboolean 
+gaim_plugin_is_loaded(plugin)
+	Gaim::Plugin plugin
+
+gboolean 
+gaim_plugin_load(plugin)
+	Gaim::Plugin plugin
+
+Gaim::Plugin
+gaim_plugin_new(native, path)
+	gboolean native
+	const char *path
+
+Gaim::Plugin
+gaim_plugin_probe(filename)
+	const char *filename
+
+gboolean 
+gaim_plugin_register(plugin)
+	Gaim::Plugin plugin
+
+gboolean 
+gaim_plugin_reload(plugin)
+	Gaim::Plugin plugin
+
+gboolean 
+gaim_plugin_unload(plugin)
+	Gaim::Plugin plugin
+
+
+
+
+MODULE = Gaim::Plugin  PACKAGE = Gaim::Plugins  PREFIX = gaim_plugins_
+PROTOTYPES: ENABLE
+
+
+void 
+gaim_plugins_add_search_path(path)
+	const char *path
+
+void 
+gaim_plugins_destroy_all()
+ 
+
+gboolean 
+gaim_plugins_enabled()
+ 
+
+Gaim::Plugin
+gaim_plugins_find_with_basename(basename)
+	const char *basename
+
+Gaim::Plugin
+gaim_plugins_find_with_filename(filename)
+	const char *filename
+
+Gaim::Plugin
+gaim_plugins_find_with_id(id)
+	const char *id
+
+Gaim::Plugin
+gaim_plugins_find_with_name(name)
+	const char *name
+
+void
+gaim_plugins_get_all()
+PREINIT:
+        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")));
+        }
+ 
+
+void *
+gaim_plugins_get_handle()
+ 
+
+void
+gaim_plugins_get_loaded()
+PREINIT:
+        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")));
+        }
+ 
+
+void
+gaim_plugins_get_protocols()
+PREINIT:
+        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")));
+        }
+ 
+
+void 
+gaim_plugins_init()
+ 
+
+void 
+gaim_plugins_load_saved(key)
+	const char *key
+
+void 
+gaim_plugins_probe(ext)
+	const char *ext
+
+void 
+gaim_plugins_uninit()
+ 
+
+void 
+gaim_plugins_unload_all()
+