diff options
| author | Timo Sirainen <cras@irssi.org> | 2001-11-15 00:04:16 +0000 |
|---|---|---|
| committer | cras <cras@dbcabf3a-b0e7-0310-adc4-f8d773084564> | 2001-11-15 00:04:16 +0000 |
| commit | 179faf041620d58d34649e80c6afd15153146a59 (patch) | |
| tree | aa127e083416eb466d57f67873ea62206e5a667c /src/perl/irc | |
| parent | da6170d4d7d750dab9de8ee2d165a40acfd43183 (diff) | |
| download | irssi-179faf041620d58d34649e80c6afd15153146a59.zip | |
redirect_event() didn't give the correct parameter to event_hash2list().
Changed void* parameters -> SV* and using them directly instead of ST(x).
git-svn-id: http://svn.irssi.org/repos/irssi/trunk@2011 dbcabf3a-b0e7-0310-adc4-f8d773084564
Diffstat (limited to 'src/perl/irc')
| -rw-r--r-- | src/perl/irc/Server.xs | 12 |
1 files changed, 6 insertions, 6 deletions
diff --git a/src/perl/irc/Server.xs b/src/perl/irc/Server.xs index c245ba03..df04e181 100644 --- a/src/perl/irc/Server.xs +++ b/src/perl/irc/Server.xs @@ -85,12 +85,12 @@ server_redirect_register(command, remote, timeout, start, stop) char *command int remote int timeout - void *start - void *stop + SV *start + SV *stop CODE: server_redirect_register_list(command, remote, timeout, - register_hash2list(hvref(ST(3))), - register_hash2list(hvref(ST(4)))); + register_hash2list(hvref(start)), + register_hash2list(hvref(stop))); void server_redirect_event(server, command, count, arg, remote, failure_signal, signals) @@ -100,11 +100,11 @@ server_redirect_event(server, command, count, arg, remote, failure_signal, signa char *arg int remote char *failure_signal - void *signals + SV *signals CODE: server_redirect_event_list(server, command, count, *arg == '\0' ? NULL : arg, remote, *failure_signal == '\0' ? NULL : failure_signal, - event_hash2list(hvref(ST(5)))); + event_hash2list(hvref(signals))); char * server_redirect_get_signal(server, event, args) |