RE: where-is-internal question

[Drew Adams]

    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?