From b6075cf36c8e0512910280158dea3b1aba212326 Mon Sep 17 00:00:00 2001 From: Timo Sirainen Date: Thu, 28 Dec 2000 17:42:17 +0000 Subject: [PATCH] removed warning git-svn-id: http://svn.irssi.org/repos/irssi/trunk@1025 dbcabf3a-b0e7-0310-adc4-f8d773084564 --- src/perl/perl-common.c | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/src/perl/perl-common.c b/src/perl/perl-common.c index e7333ff1..35b83828 100644 --- a/src/perl/perl-common.c +++ b/src/perl/perl-common.c @@ -93,7 +93,7 @@ SV *irssi_bless_plain(const char *stash, void *object) hv_store(hv, "_irssi", 6, newSViv(GPOINTER_TO_INT(object)), 0); if (fill_func != NULL) fill_func(hv, object); - return sv_bless(newRV_noinc((SV*)hv), gv_stashpv(stash, 1)); + return sv_bless(newRV_noinc((SV*)hv), gv_stashpv((char *)stash, 1)); } void *irssi_ref_object(SV *o)