summaryrefslogtreecommitdiff
path: root/src/perl/common/typemap
diff options
context:
space:
mode:
authorTimo Sirainen <cras@irssi.org>2001-07-24 22:21:48 +0000
committercras <cras@dbcabf3a-b0e7-0310-adc4-f8d773084564>2001-07-24 22:21:48 +0000
commit338e58cbaddc4f6cec1a2fd5e474a58249757a0b (patch)
treecbc197a661a67c72b8bcacdc7311e976a97f032a /src/perl/common/typemap
parent00f7246d7c65646c0ea60325081c6586f24f9d3a (diff)
downloadirssi-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/common/typemap')
-rw-r--r--src/perl/common/typemap2
1 files changed, 1 insertions, 1 deletions
diff --git a/src/perl/common/typemap b/src/perl/common/typemap
index 9de29109..f7829f58 100644
--- a/src/perl/common/typemap
+++ b/src/perl/common/typemap
@@ -28,5 +28,5 @@ T_IrssiObj
$arg = irssi_bless((SERVER_REC *)$var);
T_PlainObj
- $arg = irssi_bless_plain(\"$type\", $var);
+ $arg = plain_bless($var, \"$type\");