summaryrefslogtreecommitdiff
path: root/src/perl
diff options
context:
space:
mode:
Diffstat (limited to 'src/perl')
-rw-r--r--src/perl/textui/TextUI.xs4
-rw-r--r--src/perl/ui/Formats.xs6
2 files changed, 7 insertions, 3 deletions
diff --git a/src/perl/textui/TextUI.xs b/src/perl/textui/TextUI.xs
index 67c4c87b..84320ffa 100644
--- a/src/perl/textui/TextUI.xs
+++ b/src/perl/textui/TextUI.xs
@@ -175,7 +175,7 @@ CODE:
OUTPUT:
RETVAL
-MODULE = Irssi::TextUI PACKAGE = Irssi::UI::Server
+MODULE = Irssi::TextUI PACKAGE = Irssi::Server
void
gui_printtext_after(server, target, prev, level, str)
@@ -195,6 +195,8 @@ BOOT:
irssi_boot(TextUI__TextBuffer);
irssi_boot(TextUI__TextBufferView);
+MODULE = Irssi::TextUI PACKAGE = Irssi
+
void
term_refresh_freeze()
diff --git a/src/perl/ui/Formats.xs b/src/perl/ui/Formats.xs
index 7ff31aac..ba28f247 100644
--- a/src/perl/ui/Formats.xs
+++ b/src/perl/ui/Formats.xs
@@ -73,17 +73,18 @@ MODULE = Irssi::UI::Formats PACKAGE = Irssi::UI::Window
#*******************************
void
-format_get_text(window, module, server, target, formatnum, ...)
+format_get_text(window, module, server, target, format, ...)
Irssi::UI::Window window
char *module
Irssi::Server server
char *target
- int formatnum
+ char *format
PREINIT:
TEXT_DEST_REC dest;
THEME_REC *theme;
char **charargs;
char *ret;
+ int formatnum;
int n;
PPCODE:
charargs = g_new0(char *, items-5+1);
@@ -93,6 +94,7 @@ PPCODE:
format_create_dest(&dest, server, target, 0, window);
theme = window_get_theme(dest.window);
+ formatnum = format_find_tag(module, format);
ret = format_get_text_theme_charargs(theme, module, &dest, formatnum, charargs);
g_free(charargs);