1
Fork 0
mirror of git://git.sv.gnu.org/emacs.git synced 2025-12-15 10:30:25 -08:00

(widget-add-change): Don't bother with make-local-hook.

This commit is contained in:
Stefan Monnier 2000-10-27 00:54:52 +00:00
parent 0b95284b91
commit 093849f9ca

View file

@ -1122,11 +1122,8 @@ Unlike (get-char-property POS 'field) this, works with empty fields too."
(widget-apply from-field :notify from-field))))))
(defun widget-add-change ()
(make-local-hook 'post-command-hook)
(remove-hook 'post-command-hook 'widget-add-change t)
(make-local-hook 'before-change-functions)
(add-hook 'before-change-functions 'widget-before-change nil t)
(make-local-hook 'after-change-functions)
(add-hook 'after-change-functions 'widget-after-change nil t))
(defun widget-after-change (from to old)