From d1c14de9a905b2278c3a450963aa8b9498198e25 Mon Sep 17 00:00:00 2001
From: Juri Linkov <juri@linkov.net>
Date: Wed, 4 Sep 2019 00:56:09 +0300
Subject: [PATCH] Small fix for text-mode display

---
 src/xdisp.c | 6 ++----
 1 file changed, 2 insertions(+), 4 deletions(-)

diff --git a/src/xdisp.c b/src/xdisp.c
index 09a243f5ae0..7ad0956d192 100644
--- a/src/xdisp.c
+++ b/src/xdisp.c
@@ -13110,17 +13110,15 @@ display_tab_bar (struct window *w)
 
   /* Display all items of the tab bar.  */
   items = it.f->tab_bar_items;
-  for (i = 0; i < ASIZE (items); i += 11)
+  for (i = 0; i < it.f->n_tab_bar_items; ++i)
     {
       Lisp_Object string;
 
       /* Stop at nil string.  */
-      string = AREF (items, i + 3);
+      string = AREF (items, i * TAB_BAR_ITEM_NSLOTS + TAB_BAR_ITEM_CAPTION);
       if (NILP (string))
 	break;
 
-      /* string = build_string ("Test 4"); */
-
       /* Display the item, pad with one space.  */
       if (it.current_x < it.last_visible_x)
 	display_string (NULL, string, Qnil, 0, 0, &it,
-- 
2.39.2