[elpa] externals/nano-modeline 7db8103e16 1/4: nano-modeline-base-face is declared as a variable

[ELPA Syncer]

branch: externals/nano-modeline
commit 7db8103e16f0ee9609b304abae8da2a6c466ec5f
Author: Aaron Jensen <aaronjensen@gmail.com>
Commit: Aaron Jensen <aaronjensen@gmail.com>

    nano-modeline-base-face is declared as a variable
    
    Fixes Emacs 30 compatibility
---
 nano-modeline.el | 8 +++++---
 1 file changed, 5 insertions(+), 3 deletions(-)

diff --git a/nano-modeline.el b/nano-modeline.el
index 9b7476da88..56ddf4750a 100644
--- a/nano-modeline.el
+++ b/nano-modeline.el
@@ -182,6 +182,8 @@
        :weight bold))
   "Highlight button face.")
 
+(defvar nano-modeline-base-face nil)
+
 (defun nano-modeline--stroke-width (face)
   "Extract the line width of the box for the given FACE."
   
@@ -241,9 +243,9 @@ make it inherit the base face."
          (state (intern (concat (symbol-name face-prefix)
                                 (if active "-active" "-inactive"))))
          (face (cdr (assoc state nano-modeline-faces)))
-         (face (if (boundp 'nano-modeline-base-face)
-                           (push nano-modeline-base-face face)
-                   face))
+         (face (if nano-modeline-base-face
+                   (push nano-modeline-base-face face)
+                 face))
          (face (reverse face)))
     `(:inherit ,face)))