From c08f9f38679f3db9b8719e7952706fee0be1cddf Mon Sep 17 00:00:00 2001 From: Wouter Coekaerts Date: Wed, 6 Oct 2004 20:48:25 +0000 Subject: [PATCH] And the same for signal_continue git-svn-id: http://svn.irssi.org/repos/irssi/trunk@3312 dbcabf3a-b0e7-0310-adc4-f8d773084564 --- src/perl/common/Core.xs | 2 ++ 1 file changed, 2 insertions(+) diff --git a/src/perl/common/Core.xs b/src/perl/common/Core.xs index 2ca79e54..451a07e2 100644 --- a/src/perl/common/Core.xs +++ b/src/perl/common/Core.xs @@ -96,6 +96,8 @@ CODE: p[n] = irssi_ref_object(ST(n)); else if (SvROK(ST(n))) p[n] = (void *) SvIV((SV*)SvRV(ST(n))); + else if (SvIOK(ST(n))) + p[n] = (void *) SvIV(ST(n)); else p[n] = NULL; }