diff options
| author | Timo Sirainen <cras@irssi.org> | 2001-10-15 18:30:33 +0000 |
|---|---|---|
| committer | cras <cras@dbcabf3a-b0e7-0310-adc4-f8d773084564> | 2001-10-15 18:30:33 +0000 |
| commit | 8c5ac3fb24587c84c8762eacd9a7a17dad49d722 (patch) | |
| tree | d6ec1b4ffa23ddaff53fde37bf7d40bc36b6a93c /src/perl | |
| parent | b3779bc7a56b61943eadb7c6961df40283bca638 (diff) | |
| download | irssi-8c5ac3fb24587c84c8762eacd9a7a17dad49d722.zip | |
refcount for timeouts/inputs wasn't 0 initially so it caused some memleaks.
git-svn-id: http://svn.irssi.org/repos/irssi/trunk@1842 dbcabf3a-b0e7-0310-adc4-f8d773084564
Diffstat (limited to 'src/perl')
| -rw-r--r-- | src/perl/perl-sources.c | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/src/perl/perl-sources.c b/src/perl/perl-sources.c index 3239a20f..a91dee6f 100644 --- a/src/perl/perl-sources.c +++ b/src/perl/perl-sources.c @@ -98,7 +98,7 @@ int perl_timeout_add(int msecs, const char *func, SV *data) { PERL_SOURCE_REC *rec; - rec = g_new(PERL_SOURCE_REC, 1); + rec = g_new0(PERL_SOURCE_REC, 1); perl_source_ref(rec); SvREFCNT_inc(data); @@ -116,7 +116,7 @@ int perl_input_add(int source, int condition, const char *func, SV *data) PERL_SOURCE_REC *rec; GIOChannel *channel; - rec = g_new(PERL_SOURCE_REC, 1); + rec = g_new0(PERL_SOURCE_REC, 1); perl_source_ref(rec); SvREFCNT_inc(data); |