[Gaim-commits] SF.net SVN: gaim: [17061] trunk/libgaim/plugins/perl/common

[<the...@us...>]

Revision: 17061
Author:   thekingant
Date:     2006-08-27 14:18:20 -0700 (Sun, 27 Aug 2006)
ViewCVS:  http://svn.sourceforge.net/gaim/?rev=17061&view=rev

Log Message:
-----------
Update perl to reflect the changes to gaim_util_fetch_url().  I hope
this compiles.

Modified Paths:
--------------
    trunk/libgaim/plugins/perl/common/Util.xs
    trunk/libgaim/plugins/perl/common/module.h
    trunk/libgaim/plugins/perl/common/typemap
Modified: trunk/libgaim/plugins/perl/common/Util.xs
===================================================================
--- trunk/libgaim/plugins/perl/common/Util.xs	2006-08-27 21:13:30 UTC (rev 17060)
+++ trunk/libgaim/plugins/perl/common/Util.xs	2006-08-27 21:18:20 UTC (rev 17061)
@@ -4,8 +4,8 @@
 	char *cb;
 } GaimPerlUrlData;
 
-static void gaim_perl_util_url_cb(void *data, const char *url_data, size_t size) {
-	GaimPerlUrlData *gpr = (GaimPerlUrlData *)data;
+static void gaim_perl_util_url_cb(Gaim::Util::FetchUrlData *url_data, void *user_data, const gchar *url_data, size_t size, const gchar *error_message) {
+	GaimPerlUrlData *gpr = (GaimPerlUrlData *)user_data;
 	dSP;
 	ENTER;
 	SAVETMPS;
@@ -26,7 +26,7 @@
 PROTOTYPES: ENABLE
 
 void
-gaim_url_fetch(handle, url, full, user_agent, http11, cb)
+gaim_util_fetch_url(handle, url, full, user_agent, http11, cb)
 	Gaim::Plugin handle
 	const char *url
 	gboolean full
@@ -44,7 +44,7 @@
 	gpr = g_new(GaimPerlUrlData, 1);
 
 	gpr->cb = g_strdup_printf("%s::%s", package, SvPV(cb, len));
-	gaim_url_fetch(url, full, user_agent, http11, gaim_perl_util_url_cb, gpr);
+	gaim_util_fetch_url(url, full, user_agent, http11, gaim_perl_util_url_cb, gpr);
 
 int
 gaim_build_dir(path, mode)

Modified: trunk/libgaim/plugins/perl/common/module.h
===================================================================
--- trunk/libgaim/plugins/perl/common/module.h	2006-08-27 21:13:30 UTC (rev 17060)
+++ trunk/libgaim/plugins/perl/common/module.h	2006-08-27 21:18:20 UTC (rev 17061)
@@ -248,7 +248,7 @@
 typedef GaimStringref *			Gaim__Stringref;
 
 /* util.h */
-typedef GaimInfoFieldFormatCallback	Gaim__Util__InfoFieldFormatCallback;
+typedef GaimUtilFetchUrlData	Gaim__Util__FetchUrlData;
 typedef GaimMenuAction *		Gaim__Menu__Action;
 
 /* value.h */

Modified: trunk/libgaim/plugins/perl/common/typemap
===================================================================
--- trunk/libgaim/plugins/perl/common/typemap	2006-08-27 21:13:30 UTC (rev 17060)
+++ trunk/libgaim/plugins/perl/common/typemap	2006-08-27 21:18:20 UTC (rev 17061)
@@ -157,6 +157,7 @@
 
 Gaim::StoredImage			T_GaimObj
 Gaim::Stringref				T_GaimObj
+Gaim::Util::FetchUrlData	T_PTR
 Gaim::Util::InfoFieldFormatCallback	T_PTR
 Gaim::Value				T_GaimObj
 


This was sent by the SourceForge.net collaborative development platform, the world's largest Open Source development site.