From 3b59f17a9981eefc27bcd923fe3ecd764c520cf4 Mon Sep 17 00:00:00 2001 From: Jim Myhrberg Date: Thu, 1 Dec 2022 21:15:21 +0000 Subject: [PATCH] fix(completion/copilot): resolve startup error in Emacs 30.x Use of the deprecated position function seems to raise a error in Emacs 30.x. Hence use the newer cl-position function which replaced it. --- modules/completion/siren-copilot.el | 3 ++- 1 file changed, 2 insertions(+), 1 deletion(-) diff --git a/modules/completion/siren-copilot.el b/modules/completion/siren-copilot.el index 7894069..397aa4b 100644 --- a/modules/completion/siren-copilot.el +++ b/modules/completion/siren-copilot.el @@ -61,8 +61,9 @@ (with-eval-after-load 'company ;; Use company popup even when there's only one result (when (member 'company-preview-if-just-one-frontend company-frontends) + (require 'cl-seq) (delq 'company-preview-if-just-one-frontend company-frontends) - (setf (nth (position 'company-pseudo-tooltip-unless-just-one-frontend + (setf (nth (cl-position 'company-pseudo-tooltip-unless-just-one-frontend company-frontends) company-frontends) 'company-pseudo-tooltip-frontend))))