Don't cleanup when clicking popup

This commit is contained in:
Yuan Fu 2019-01-05 19:45:50 -05:00
parent 5479b6357e
commit a34e2e2e6e
No known key found for this signature in database
GPG Key ID: 1CF5ECABEC37A901

View File

@ -329,7 +329,9 @@ If (point) != last point, cleanup frame.")
(defun eldoc-box--eglot-help-at-point-cleanup () (defun eldoc-box--eglot-help-at-point-cleanup ()
"Try to clean up the childframe made by eldoc-box hack." "Try to clean up the childframe made by eldoc-box hack."
(if (eq (point) eldoc-box-eglot-help-at-point-last-point) (if (or (eq (point) eldoc-box-eglot-help-at-point-last-point)
;; don't clean up when the user clicks childframe
(eq (selected-frame) eldoc-box--frame))
(run-with-timer 0.1 nil #'eldoc-box--eglot-help-at-point-cleanup) (run-with-timer 0.1 nil #'eldoc-box--eglot-help-at-point-cleanup)
(eldoc-box-quit-frame))) (eldoc-box-quit-frame)))