diff options
Diffstat (limited to 'src/perl/irc/Dcc.xs')
| -rw-r--r-- | src/perl/irc/Dcc.xs | 8 |
1 files changed, 7 insertions, 1 deletions
diff --git a/src/perl/irc/Dcc.xs b/src/perl/irc/Dcc.xs index 657783a7..8c906a19 100644 --- a/src/perl/irc/Dcc.xs +++ b/src/perl/irc/Dcc.xs @@ -58,9 +58,15 @@ dcc_ctcp_message(server, target, chat, notice, msg) int notice char *msg -char * +void dcc_get_download_path(fname) char *fname +PREINIT: + char *ret; +PPCODE: + ret = dcc_get_download_path(fname); + xPUSHs(sv_2mortal(new_pv(ret))); + g_free(ret); #******************************* MODULE = Irssi::Irc::Dcc PACKAGE = Irssi::Irc::Dcc PREFIX = dcc_ |