In previous Emacs versions, I could do this, to bind stuff that
is bound to self-insert-command in the global map:
(dolist (key (where-is-internal 'self-insert-command global-map))
(define-key my-map key 'my-command))
Now, however, it looks like I need to do something like the
following.
(dolist (key (or (condition-case nil
(where-is-internal 'self-insert-command
global-map nil nil t)
(wrong-number-of-arguments nil))
(where-is-internal 'self-insert-command
global-map)))
(define-key my-map key 'my-command))
I forgot to mention that, whereas the above code is lightning-quick in Emacs
20 (without the 5th arg), in Emacs 22 it takes about 5 _seconds_ (on a
pretty fast machine). Why so slow?
_______________________________________________
Emacs-devel mailing list
[email protected]
http://lists.gnu.org/mailman/listinfo/emacs-devel
