Mercurial > pidgin

diff src/perl.c @ 592:7c75d69a1129

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
[gaim-migrate @ 602] this really cool guy sent a patch to convert %n, %d and %t to things in away messages. i just wish i could remember his name. committer: Tailor Script <tailor@pidgin.im>
author Eric Warmenhoven <eric@warmenhoven.org>
date Thu, 03 Aug 2000 05:35:13 +0000
parents a26eb4c472d8
children 3a24fd19ff5f
line wrap: on
line diff
--- a/src/perl.c	Thu Aug 03 02:05:26 2000 +0000
+++ b/src/perl.c	Thu Aug 03 05:35:13 2000 +0000
@@ -260,7 +260,16 @@
 
 XS (XS_AIM_print)
 {
-	/* FIXME */
+	char *title;
+	char *message;
+	int junk;
+	dXSARGS;
+	items = 0;
+
+	title = SvPV(ST(0), junk);
+	message = SvPV(ST(1), junk);
+	do_error_dialog(message, title);
+	XSRETURN(0);
 }
 
 XS (XS_AIM_buddy_list)