aboutsummaryrefslogtreecommitdiffstats
path: root/lisp
diff options
context:
space:
mode:
Diffstat (limited to 'lisp')
-rw-r--r--lisp/cus-start.el1
-rw-r--r--lisp/startup.el4
-rw-r--r--lisp/tab-bar.el2
3 files changed, 2 insertions, 5 deletions
diff --git a/lisp/cus-start.el b/lisp/cus-start.el
index d5d5c6a826c..e61c1954a1f 100644
--- a/lisp/cus-start.el
+++ b/lisp/cus-start.el
@@ -591,7 +591,6 @@ since it could result in memory overflow and make Emacs crash."
591 (const :tag "Text-image-horiz" :value text-image-horiz) 591 (const :tag "Text-image-horiz" :value text-image-horiz)
592 (const :tag "System default" :value nil)) "24.1") 592 (const :tag "System default" :value nil)) "24.1")
593 (tool-bar-max-label-size frames integer "24.1") 593 (tool-bar-max-label-size frames integer "24.1")
594 (tab-bar-max-label-size frames integer "27.1")
595 (auto-hscroll-mode scrolling 594 (auto-hscroll-mode scrolling
596 (choice 595 (choice
597 (const :tag "Don't scroll automatically" 596 (const :tag "Don't scroll automatically"
diff --git a/lisp/startup.el b/lisp/startup.el
index 2ab4a3ae789..c0d6024cfab 100644
--- a/lisp/startup.el
+++ b/lisp/startup.el
@@ -731,9 +731,7 @@ It is the default value of the variable `top-level'."
731 ("--background-color" . "-bg") 731 ("--background-color" . "-bg")
732 ("--color" . "-color"))) 732 ("--color" . "-color")))
733 733
734(defconst tab-bar-images-pixel-height 18 734;; FIXME: this var unused?
735 "Height in pixels of images in the tab-bar.")
736
737(defconst tool-bar-images-pixel-height 24 735(defconst tool-bar-images-pixel-height 24
738 "Height in pixels of images in the tool-bar.") 736 "Height in pixels of images in the tool-bar.")
739 737
diff --git a/lisp/tab-bar.el b/lisp/tab-bar.el
index 3108c595e94..42d40a96543 100644
--- a/lisp/tab-bar.el
+++ b/lisp/tab-bar.el
@@ -488,7 +488,7 @@ specified by `tab-bar-close-tab-select'."
488 (unless tab-bar-mode 488 (unless tab-bar-mode
489 (message "Added new tab with the current window configuration"))) 489 (message "Added new tab with the current window configuration")))
490 490
491(defun tab-delete () 491(defun tab-close ()
492 "Delete the current window configuration without clicking a close button." 492 "Delete the current window configuration without clicking a close button."
493 (interactive) 493 (interactive)
494 (tab-bar-close-current-tab) 494 (tab-bar-close-current-tab)