diff options
| author | Stefan Monnier <monnier@iro.umontreal.ca> | 2000-10-27 00:54:52 +0000 |
|---|---|---|
| committer | Stefan Monnier <monnier@iro.umontreal.ca> | 2000-10-27 00:54:52 +0000 |
| commit | 093849f9ca82296eccfcb05d8c6f374bb59ba386 (patch) | |
| tree | e187db4fd2578d196632c278c4be3fa0f0bf33c3 | |
| parent | 0b95284b9165fa19115e5a8a50e2446e955fd833 (diff) | |
| download | emacs-093849f9ca82296eccfcb05d8c6f374bb59ba386.tar.gz | |
(widget-add-change): Don't bother with make-local-hook.
| -rw-r--r-- | lisp/wid-edit.el | 3 |
1 files changed, 0 insertions, 3 deletions
diff --git a/lisp/wid-edit.el b/lisp/wid-edit.el index bfed43794a6..deed46ddcda 100644 --- a/lisp/wid-edit.el +++ b/lisp/wid-edit.el @@ -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) |