From 08877dbf75d5ee9c6ed71ac8ad3817b47823e499 Mon Sep 17 00:00:00 2001 From: Daniel Mendler Date: Sat, 27 Nov 2021 11:52:25 +0100 Subject: Improve comments --- cape.el | 6 +++--- 1 file changed, 3 insertions(+), 3 deletions(-) diff --git a/cape.el b/cape.el index 792306c..8656c3e 100644 --- a/cape.el +++ b/cape.el @@ -732,14 +732,14 @@ If INTERACTIVE is nil the function acts like a capf." (defun cape--company-call (backend &rest args) "Call Company BACKEND with ARGS." - ;; Company backends are non-interruptible! + ;; Company backends are non-interruptible. (pcase (let (throw-on-input) (apply backend args)) (`(:async . ,fetcher) (let ((res 'trash) (start (time-to-seconds))) - ;; Company backends are non-interruptible! + ;; Company backends are non-interruptible. (let (throw-on-input) (funcall fetcher (lambda (arg) (setq res arg)))) - ;; Force synchronization + ;; Force synchronization. The synchronization is interruptible! (while (eq res 'trash) (sleep-for company-async-wait) (when (> (- (time-to-seconds) start) company-async-timeout) -- cgit v1.0