diff options
| author | Wouter Coekaerts <coekie@irssi.org> | 2004-10-06 20:48:25 +0000 |
|---|---|---|
| committer | coekie <coekie@dbcabf3a-b0e7-0310-adc4-f8d773084564> | 2004-10-06 20:48:25 +0000 |
| commit | c08f9f38679f3db9b8719e7952706fee0be1cddf (patch) | |
| tree | ee45e8ddbfb222e3c1184d3644676d3780f557c1 /src/perl/common | |
| parent | 64c6af78651571392e999d00d1e76c8384434248 (diff) | |
| download | irssi-c08f9f38679f3db9b8719e7952706fee0be1cddf.zip | |
And the same for signal_continue
git-svn-id: http://svn.irssi.org/repos/irssi/trunk@3312 dbcabf3a-b0e7-0310-adc4-f8d773084564
Diffstat (limited to 'src/perl/common')
| -rw-r--r-- | src/perl/common/Core.xs | 2 |
1 files changed, 2 insertions, 0 deletions
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; } |