Mercurial > pidgin.yaz

changeset 781:95ebfdb31a9b

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
[gaim-migrate @ 791] arg committer: Tailor Script <tailor@pidgin.im>
author Eric Warmenhoven <eric@warmenhoven.org>
date Tue, 29 Aug 2000 04:02:10 +0000
parents c714def9cebb
children faa7faf60607
files src/perl.c
diffstat 1 files changed, 2 insertions(+), 2 deletions(-) [+]
line wrap: on
line diff
--- a/src/perl.c	Tue Aug 29 03:59:01 2000 +0000
+++ b/src/perl.c	Tue Aug 29 04:02:10 2000 +0000
@@ -60,7 +60,7 @@
 struct _perl_event_handlers {
 	char *event_type;
 	char *handler_name;
-}
+};
 
 struct _perl_timeout_handlers {
 	char *handler_name;
@@ -526,7 +526,7 @@
 	for (handler = perl_event_handlers; handler != NULL; handler = handler->next) {
 		data = handler->data;
 		if (!strcmp(event_name(event), data->event_type))
-			execute_perl(args);
+			execute_perl(data->handler_name, args);
 	}
 
 	return 0;