projects
/
silc.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
Merged Irssi SVN (upcoming irssi 0.8.11).
[silc.git]
/
apps
/
irssi
/
src
/
perl
/
ui
/
Formats.xs
diff --git
a/apps/irssi/src/perl/ui/Formats.xs
b/apps/irssi/src/perl/ui/Formats.xs
index 11a2951c32832d550f9701435d7bf5e51881fc1c..7ff31aac5868e6aafd20b41da60faa9d8ac2b150 100644
(file)
--- a/
apps/irssi/src/perl/ui/Formats.xs
+++ b/
apps/irssi/src/perl/ui/Formats.xs
@@
-3,9
+3,11
@@
static int magic_free_text_dest(pTHX_ SV *sv, MAGIC *mg)
{
TEXT_DEST_REC *dest = (TEXT_DEST_REC *) mg->mg_ptr;
static int magic_free_text_dest(pTHX_ SV *sv, MAGIC *mg)
{
TEXT_DEST_REC *dest = (TEXT_DEST_REC *) mg->mg_ptr;
- g_free((char *) dest->target);
+ char *target = (char *) dest->target;
+ g_free(target);
g_free(dest);
mg->mg_ptr = NULL;
g_free(dest);
mg->mg_ptr = NULL;
+ sv_setiv(sv, 0);
return 0;
}
return 0;
}
@@
-131,4
+133,4
@@
print(dest, str)
Irssi::UI::TextDest dest
char *str
CODE:
Irssi::UI::TextDest dest
char *str
CODE:
- printtext_dest(dest, str);
+ printtext_dest(dest,
"%s",
str);