diff options
Diffstat (limited to 'src/perl/ui/Window.xs')
| -rw-r--r-- | src/perl/ui/Window.xs | 11 |
1 files changed, 11 insertions, 0 deletions
diff --git a/src/perl/ui/Window.xs b/src/perl/ui/Window.xs index ab52c910..ea3735a6 100644 --- a/src/perl/ui/Window.xs +++ b/src/perl/ui/Window.xs @@ -243,6 +243,17 @@ CODE: OUTPUT: RETVAL +void +window_get_history_lines(window) + Irssi::UI::Window window +PREINIT: + HISTORY_REC *rec; + GList *tmp; +PPCODE: + rec = command_history_current(window); + for (tmp = rec->list; tmp != NULL; tmp = tmp->next) + XPUSHs(sv_2mortal(new_pv(tmp->data))); + #******************************* MODULE = Irssi::UI::Window PACKAGE = Irssi::Windowitem PREFIX = window_item_ #******************************* |