diff options
| author | Timo Sirainen <cras@irssi.org> | 2001-07-24 22:21:48 +0000 |
|---|---|---|
| committer | cras <cras@dbcabf3a-b0e7-0310-adc4-f8d773084564> | 2001-07-24 22:21:48 +0000 |
| commit | 338e58cbaddc4f6cec1a2fd5e474a58249757a0b (patch) | |
| tree | cbc197a661a67c72b8bcacdc7311e976a97f032a /src/perl/perl-signals.c | |
| parent | 00f7246d7c65646c0ea60325081c6586f24f9d3a (diff) | |
| download | irssi-338e58cbaddc4f6cec1a2fd5e474a58249757a0b.zip | |
Don't crash when trying to bless NULLs
git-svn-id: http://svn.irssi.org/repos/irssi/trunk@1645 dbcabf3a-b0e7-0310-adc4-f8d773084564
Diffstat (limited to 'src/perl/perl-signals.c')
| -rw-r--r-- | src/perl/perl-signals.c | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/src/perl/perl-signals.c b/src/perl/perl-signals.c index 8f47e93f..d0948ad9 100644 --- a/src/perl/perl-signals.c +++ b/src/perl/perl-signals.c @@ -124,7 +124,7 @@ static void perl_call_signal(const char *func, int signal_id, perlarg = irssi_bless((SERVER_REC *) arg); } else { /* blessed object */ - perlarg = irssi_bless_plain(rec->args[n], arg); + perlarg = plain_bless(rec->args[n], arg); } XPUSHs(sv_2mortal(perlarg)); } |