Fix error message with async lookup handlers

Even if they succeeded.

Mentioned in #716
This commit is contained in:
Henrik Lissner 2019-01-23 16:07:09 -05:00
parent 5c1edde613
commit 2e8329e6b6
No known key found for this signature in database
GPG key ID: 5F6C0EA160557395

View file

@ -125,7 +125,8 @@ Otherwise, these properties are available to be set:
;; reliably, so we set up the new window ahead of time. ;; reliably, so we set up the new window ahead of time.
(switch-to-buffer-other-window (current-buffer)) (switch-to-buffer-other-window (current-buffer))
(goto-char (marker-position origin))) (goto-char (marker-position origin)))
(call-interactively fn)) (call-interactively fn)
t)
if (condition-case e if (condition-case e
(save-window-excursion (save-window-excursion
(when (or (if (commandp cmd) (when (or (if (commandp cmd)