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?




_______________________________________________
Help-gnu-emacs mailing list
Help-gnu-emacs@gnu.org
http://lists.gnu.org/mailman/listinfo/help-gnu-emacs

Reply via email to