EUDC: Prevent field overlap when query form is reset

* lisp/net/eudc.el (eudc-query-form): Delete all overlays before
erasing buffer.  Remove widget-after-change from
after-change-functions.
This commit is contained in:
Thomas Fitzsimmons 2022-06-29 21:37:57 -04:00
parent fb3d582e7b
commit d7dc8c5fe4

View file

@ -1026,7 +1026,10 @@ queries the server for the existing fields and displays a corresponding form."
pt)
(switch-to-buffer buffer)
(let ((inhibit-read-only t))
(remove-hook 'after-change-functions 'widget-after-change t)
(delete-all-overlays)
(erase-buffer)
(add-hook 'after-change-functions 'widget-after-change nil t)
(kill-all-local-variables)
(make-local-variable 'eudc-form-widget-list)
(widget-insert "Directory Query Form\n")