summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorDaniel Mendler <mail@daniel-mendler.de>2021-11-28 23:44:31 +0100
committerDaniel Mendler <mail@daniel-mendler.de>2021-11-28 23:44:31 +0100
commit4aec140c08e386f09f0d7e623c58710d7256c6d2 (patch)
treec00e0254b4fd448739b665e5fe1115fca066c4b8
parentb3e2850fcfe63d06f8e00ba985d964a4ba6e3935 (diff)
Minor cleanup
-rw-r--r--cape.el6
1 files changed, 3 insertions, 3 deletions
diff --git a/cape.el b/cape.el
index d653593..fa83849 100644
--- a/cape.el
+++ b/cape.el
@@ -735,12 +735,12 @@ If INTERACTIVE is nil the function acts like a capf."
:annotation-function (funcall extra-fun :annotation-function)
:exit-function (lambda (x _status) (funcall (funcall extra-fun :exit-function) x)))))))
-(defun cape--company-call (backend &rest args)
- "Call Company BACKEND with ARGS."
+(defun cape--company-call (&rest app)
+ "Apply APP and handle future return values."
;; Company backends are non-interruptible.
(let ((toi throw-on-input)
(throw-on-input nil))
- (pcase (apply backend args)
+ (pcase (apply app)
(`(:async . ,future)
(let ((res 'cape--waiting)
(start (time-to-seconds)))