From 4509aaa5b0666a120fb1e255d52d83d03c46c596 Mon Sep 17 00:00:00 2001 From: Juri Linkov Date: Tue, 15 Oct 2019 22:41:40 +0300 Subject: New variable tab-bar-position * lisp/cus-start.el: Add customization for tab-bar-position. * src/dispnew.c (syms_of_display): New variable Vtab_bar_position. (adjust_frame_glyphs_for_window_redisplay): Use it. --- lisp/cus-start.el | 6 ++++++ 1 file changed, 6 insertions(+) (limited to 'lisp/cus-start.el') diff --git a/lisp/cus-start.el b/lisp/cus-start.el index 89a96a9f51c..d1278192ef7 100644 --- a/lisp/cus-start.el +++ b/lisp/cus-start.el @@ -591,6 +591,12 @@ since it could result in memory overflow and make Emacs crash." (const :tag "Text-image-horiz" :value text-image-horiz) (const :tag "System default" :value nil)) "24.1") (tool-bar-max-label-size frames integer "24.1") + (tab-bar-position tab-bar boolean "27.1" + :set (lambda (sym val) + (set-default sym val) + ;; Redraw the bars: + (tab-bar-mode -1) + (tab-bar-mode 1))) (auto-hscroll-mode scrolling (choice (const :tag "Don't scroll automatically" -- cgit v1.2.3