Mercurial > pidgin

diff src/perl.c @ 1734:dd78a230aa06

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
[gaim-migrate @ 1744] fun stuff committer: Tailor Script <tailor@pidgin.im>
author Eric Warmenhoven <eric@warmenhoven.org>
date Fri, 20 Apr 2001 23:04:48 +0000
parents 2d7601acacdd
children 1e0613d9526b
line wrap: on
line diff
--- a/src/perl.c	Fri Apr 20 16:31:36 2001 +0000
+++ b/src/perl.c	Fri Apr 20 23:04:48 2001 +0000
@@ -456,7 +456,7 @@
 
 		while (c) {
 			gc = (struct gaim_connection *)c->data;
-			serv_warn(gc, SvPV(ST(1), junk), 0);
+			serv_warn(gc, SvPV(ST(1), junk), atoi(SvPV(ST(2), junk)));
 			c = c->next;
 		}
 	}