Skip to content

Commit 842be58

Browse files
committed
refactor: use a function to cancel the inline completion idle timer
1 parent 1472333 commit 842be58

File tree

1 file changed

+10
-4
lines changed

1 file changed

+10
-4
lines changed

lsp-inline-completion.el

Lines changed: 10 additions & 4 deletions
Original file line numberDiff line numberDiff line change
@@ -407,16 +407,23 @@ lsp-inline-completion-mode is active."
407407
(defvar-local lsp-inline-completion--idle-timer nil
408408
"The idle timer used by lsp-inline-completion-mode.")
409409

410+
;;;###autoload
411+
(defun lsp-inline-completion-cancel-timer ()
412+
"Cancels the completion idle timer, if set"
413+
(when lsp-inline-completion--idle-timer
414+
(cancel-timer lsp-inline-completion--idle-timer)
415+
(setq lsp-inline-completion--idle-timer nil)))
416+
410417
;;;###autoload
411418
(define-minor-mode lsp-inline-completion-mode
412419
"Mode automatically displaying inline completions."
413420
:lighter nil
414421
(cond
415422
((and lsp-inline-completion-mode lsp--buffer-workspaces)
416423
(add-hook 'lsp-on-change-hook #'lsp-inline-completion--after-change nil t))
424+
417425
(t
418-
(when lsp-inline-completion--idle-timer
419-
(cancel-timer lsp-inline-completion--idle-timer))
426+
(lsp-inline-completion-cancel-timer)
420427

421428
(lsp-inline-completion-cancel)
422429

@@ -439,8 +446,7 @@ lsp-inline-completion-mode is active."
439446
;; modified in the meantime! Use the values in lsp--after-change-vals to
440447
;; ensure this.
441448

442-
(when lsp-inline-completion--idle-timer
443-
(cancel-timer lsp-inline-completion--idle-timer))
449+
(lsp-inline-completion-cancel-timer)
444450

445451
(when (and lsp-inline-completion-mode lsp--buffer-workspaces)
446452
(let ((original-buffer (plist-get lsp--after-change-vals :buffer))

0 commit comments

Comments
 (0)