]> git.eshelyaron.com Git - emacs.git/commitdiff
Unbreak the build broken by tab-bar.el changes
authorEli Zaretskii <eliz@gnu.org>
Mon, 24 Oct 2022 13:43:47 +0000 (16:43 +0300)
committerEli Zaretskii <eliz@gnu.org>
Mon, 24 Oct 2022 13:43:47 +0000 (16:43 +0300)
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.

lisp/tab-bar.el

index ea615b92a2096f72791974723a86dcbfbf18dc89..9c746b8978b89ac773dee6e02d9c2913e247945f 100644 (file)
@@ -33,7 +33,8 @@
 
 (eval-when-compile
   (require 'cl-lib)
-  (require 'seq))
+  (require 'seq)
+  (require 'icons))
 
 \f
 (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"