diff options
Diffstat (limited to 'src/perl/common/Log.xs')
| -rw-r--r-- | src/perl/common/Log.xs | 4 |
1 files changed, 1 insertions, 3 deletions
diff --git a/src/perl/common/Log.xs b/src/perl/common/Log.xs index 43ebad3c..4879aef9 100644 --- a/src/perl/common/Log.xs +++ b/src/perl/common/Log.xs @@ -4,11 +4,9 @@ void logs() PREINIT: GSList *tmp; - HV *stash; PPCODE: - stash = gv_stashpv("Irssi::Log", 0); for (tmp = logs; tmp != NULL; tmp = tmp->next) { - push_bless(tmp->data, stash); + XPUSHs(sv_2mortal(plain_bless(tmp->data, "Irssi::Log"))); } Irssi::Log |