From: Po Lu <luangruo@yahoo.com>
Date: Sat, 27 Nov 2021 00:34:51 +0000 (+0800)
Subject: Set initial tab bar parameter on NS
X-Git-Tag: emacs-29.0.90~3649^2~31
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=f1116f45bcabc5628e7443a2c792971c7c23b8b1;p=emacs.git

Set initial tab bar parameter on NS

* src/nsfns.m (Fx_create_frame): Initialize `tab-bar-lines'
frame parameter during frame creation.
---

diff --git a/src/nsfns.m b/src/nsfns.m
index f4d81722460..c2791aa15a9 100644
--- a/src/nsfns.m
+++ b/src/nsfns.m
@@ -1365,6 +1365,10 @@ DEFUN ("x-create-frame", Fx_create_frame, Sx_create_frame,
                          NILP (Vmenu_bar_mode)
                          ? make_fixnum (0) : make_fixnum (1),
                          NULL, NULL, RES_TYPE_NUMBER);
+  gui_default_parameter (f, parms, Qtab_bar_lines,
+                         NILP (Vtab_bar_mode)
+                         ? make_fixnum (0) : make_fixnum (1),
+			 NULL, NULL, RES_TYPE_NUMBER);
   gui_default_parameter (f, parms, Qtool_bar_lines,
                          NILP (Vtool_bar_mode)
                          ? make_fixnum (0) : make_fixnum (1),