From c49ed7d654aa32e7d6043fbf0dda66d097141cac Mon Sep 17 00:00:00 2001
From: Ricardo Wurmus <rekado@elephly.net>
Date: Fri, 1 Jan 2021 19:44:36 +0100
Subject: Show tab line in Scheme buffers.

---
 guile-studio-configure.scm | 4 ++++
 1 file changed, 4 insertions(+)

diff --git a/guile-studio-configure.scm b/guile-studio-configure.scm
index f6bc582..3a8ab73 100644
--- a/guile-studio-configure.scm
+++ b/guile-studio-configure.scm
@@ -19,6 +19,9 @@
     (menu-bar-mode 1)
     (scroll-bar-mode -1)
 
+    ;; Show only buffers with the same major mode in the same tab line.
+    (setq tab-line-tabs-function 'tab-line-tabs-mode-buffers)
+
     (require 'ivy)
     (ivy-mode 1)
     ;; Enter directory when hitting RET
@@ -441,6 +444,7 @@ with the "
               (lambda ()
                 (paren-face-mode 1)
                 (show-paren-mode 1)
+                (tab-line-mode 1)
                 (unless (local-variable-p 'tool-bar-map)
                   (set (make-local-variable 'tool-bar-map)
                        scheme-tool-bar-map))))
-- 
cgit v1.2.3