aniani/irssi
1
0
Fork 0
mirror of https://github.com/irssi/irssi.git synced 2024-09-01 04:14:16 -04:00
Code

Add print_after method to Window perl object analogous to

Browse Source 
gui_printtext_after but which also expands formats and forces a full
line.


git-svn-id: file:///var/www/svn.irssi.org/SVN/irssi/trunk@4962 dbcabf3a-b0e7-0310-adc4-f8d773084564
This commit is contained in:
Emanuele Giaquinta 2008-12-10 09:35:25 +00:00 committed by exg
parent 0327b7d5dc
commit 29a56d7974
1 changed files with 18 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

18
src/perl/textui/TextUI.xs
View File

@ -137,6 +137,24 @@ CODE:
MODULE = Irssi::TextUI PACKAGE = Irssi::UI::Window
void
print_after(window, prev, level, str)
Irssi::UI::Window window
Irssi::TextUI::Line prev
int level
char *str
PREINIT:
TEXT_DEST_REC dest;
char *text;
char *text2;
CODE:
format_create_dest(&dest, NULL, NULL, level, window);
text = format_string_expand(str, NULL);
text2 = g_strconcat(text, "\n", NULL);
gui_printtext_after(&dest, prev, text2);
g_free(text);
g_free(text2);
void
gui_printtext_after(window, prev, level, str)
Irssi::UI::Window window