From 1d649e5d001adb9f194abd0d40e9cb1a4a3e7977 Mon Sep 17 00:00:00 2001 From: LemonBoy Date: Wed, 10 Jan 2018 12:15:24 +0100 Subject: [PATCH] Merge pull request #808 from vague666/perl_hidden_level Add perl access to hidden_level in TEXT_BUFFER_VIEW_REC (cherry picked from commit b3b68a4ae79c83b68f72dfe2b7f3c21ed5463c9e) --- src/perl/textui/TextUI.xs | 1 + 1 file changed, 1 insertion(+) diff --git a/src/perl/textui/TextUI.xs b/src/perl/textui/TextUI.xs index 5d2c8a7f..12732e3f 100644 --- a/src/perl/textui/TextUI.xs +++ b/src/perl/textui/TextUI.xs @@ -40,6 +40,7 @@ static void perl_text_buffer_view_fill_hash(HV *hv, TEXT_BUFFER_VIEW_REC *view) (void) hv_store(hv, "startline", 9, plain_bless(view->startline, "Irssi::TextUI::Line"), 0); (void) hv_store(hv, "subline", 7, newSViv(view->subline), 0); + (void) hv_store(hv, "hidden_level", 12, newSViv(view->hidden_level), 0); (void) hv_store(hv, "bottom_startline", 16, plain_bless(view->bottom_startline, "Irssi::TextUI::Line"), 0); (void) hv_store(hv, "bottom_subline", 14, newSViv(view->bottom_subline), 0);