From: Eli Zaretskii Date: Mon, 24 Oct 2022 13:43:47 +0000 (+0300) Subject: Unbreak the build broken by tab-bar.el changes X-Git-Tag: emacs-29.0.90~1616^2~483 X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=0c9d31812f91fcddb1d6626c26313cd45a661b5f;p=emacs.git Unbreak the build broken by tab-bar.el changes Without this change, compiling tab-bar.el errors out: In tab-bar--load-buttons: tab-bar.el:161:18: Warning: reference to free variable `tab-bar-new' tab-bar.el:174:6: Error: `define-icon' defined after use in (define-icon tab-bar-close nil (cons (cons 'image (cons "tabs/close.xpm" (cons :margin (cons tab-bar-button-margin '(:ascent center))))) '((text " x"))) "Icon for closing the clicked tab." :version "29.1" :help-echo "Click to close tab") (missing `require' of a library file?) tab-bar.el:174:18: Warning: reference to free variable `tab-bar-close' * lisp/tab-bar.el (eval-when-compile): Require 'icons. --- diff --git a/lisp/tab-bar.el b/lisp/tab-bar.el index ea615b92a20..9c746b8978b 100644 --- a/lisp/tab-bar.el +++ b/lisp/tab-bar.el @@ -33,7 +33,8 @@ (eval-when-compile (require 'cl-lib) - (require 'seq)) + (require 'seq) + (require 'icons)) (defgroup tab-bar nil @@ -156,7 +157,6 @@ For easier selection of tabs by their numbers, consider customizing (defun tab-bar--load-buttons () "Load the icons for the tab buttons." (require 'icons) - (unless (iconp 'tab-bar-new) (define-icon tab-bar-new nil `((image "tabs/new.xpm"