From f2e73a7046358ed948b14180c70bab5dba5364cc Mon Sep 17 00:00:00 2001 From: Jari Matilainen Date: Tue, 9 Jan 2018 23:15:08 +0100 Subject: [PATCH 1/2] Add perl access to hidden_level in TEXT_BUFFER_VIEW_REC --- 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..ff94ad5f 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); From 4041f29711e5a6745175d0ae046e68e34f034bf4 Mon Sep 17 00:00:00 2001 From: Jari Matilainen Date: Tue, 9 Jan 2018 23:16:26 +0100 Subject: [PATCH 2/2] Changed spaces to tab --- src/perl/textui/TextUI.xs | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/src/perl/textui/TextUI.xs b/src/perl/textui/TextUI.xs index ff94ad5f..12732e3f 100644 --- a/src/perl/textui/TextUI.xs +++ b/src/perl/textui/TextUI.xs @@ -40,7 +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, "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);