summaryrefslogtreecommitdiff
path: root/src/perl
diff options
context:
space:
mode:
Diffstat (limited to 'src/perl')
-rw-r--r--src/perl/ui/UI.xs2
1 files changed, 1 insertions, 1 deletions
diff --git a/src/perl/ui/UI.xs b/src/perl/ui/UI.xs
index 846bbc8f..d427dd07 100644
--- a/src/perl/ui/UI.xs
+++ b/src/perl/ui/UI.xs
@@ -70,7 +70,7 @@ void printformat_perl(TEXT_DEST_REC *dest, char *format, char **arglist)
&dest, GINT_TO_POINTER(formatnum), arglist);
str = format_get_text_theme_charargs(theme, module, dest, formatnum, arglist);
- if (*str != '\0') printtext_window(dest->window, dest->level, "%s", str);
+ if (*str != '\0') printtext_dest(dest, "%s", str);
g_free(str);
g_free(module);
}