> Another question about use of `special-event-map' - consider this code: > > (define-key special-event-map [iconify-frame] 'toto) > > (defun foo () > (interactive) > (let ((binding (lookup-key special-event-map [iconify-frame]))) > (define-key special-event-map [iconify-frame] 'ignore-event) > (iconify-frame) > (define-key special-event-map [iconify-frame] binding))) > > (defun toto (event) > (interactive "e") > (message "TOTO")) > > When I try M-x foo, `toto' gets executed, even though `foo' tries to remove > its binding. Same thing happens if I use `nil' instead of `ignore-event'. > > Explanation? Any way around this? That is, is there some way I can inhibit > the binding of [iconify-frame] for the duration of command foo? (defun foo () (interactive) (iconify-frame) (while (not (input-pending-p)) (sit-for 1)) (discard-input)) Very nice! Works like a charm. Merci. - Drew
_______________________________________________ Help-gnu-emacs mailing list Help-gnu-emacs@gnu.org http://lists.gnu.org/mailman/listinfo/help-gnu-emacs