fix: compile warning

elp-revive · Nov 20, 2024 · 8b2d545 · 8b2d545
1 parent 157b2f8
commit 8b2d545
Show file tree

Hide file tree

Showing 2 changed files with 2 additions and 2 deletions.
diff --git a/company-box-util.el b/company-box-util.el
@@ -93,7 +93,7 @@
 
 (defun company-box--frame-show (show frame timer)
   "Show the frame if SHOW is non-nil; else we hide it."
-  (if-let (((frame-live-p frame)))
+  (if-let* (((frame-live-p frame)))
       (let ((visible (frame-visible-p frame))
             (func (if show #'make-frame-visible #'make-frame-invisible)))
         (unless (eq show visible) (funcall func frame))

diff --git a/company-box.el b/company-box.el
@@ -126,7 +126,7 @@ If a function returns nil, it call the next function in the list.
 If all functions returns nil, `company-box-icons-unknown' is used.
 
 [1] https://www.gnu.org/software/emacs/manual/html_node/elisp/Image-Descriptors.html"
-  :type 'list
+  :type '(list symbol)
   :group 'company-box)
 
 (defcustom company-box-scrollbar t