Re: where-is-internal question

[Kim F. Storm]

"Drew Adams" <address@hidden> writes:

> I haven't looked into this in detail - forgive my incomplete understanding.
> I'm looking for help on where-is-internal - as regards command remapping (I
> guess).
>
> 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))

What's wrong with

       (if (boundp 'this-original-command)
            (define-key my-map [remap self-insert-command] 'my-command)
          (dolist (key (where-is-internal 'self-insert-command global-map))
            (define-key my-map key 'my-command)))

Since you are (probably) going to use my-map as a local map, it will
be searched before other maps which may also have remapped
self-insert-command so your mapping will take precedence.

>
> Now, however, it looks like I need to do something like the following. Let
> me know if I'm missing something, and there is a simpler way.
>
> (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))) ; use
> old version
>   (define-key my-map key 'my-command))
>
> IIUC (probably not), the 5th arg to where-is-internal is needed here,
> because of some remapping done to self-insert-command (?). The NEWS file
> says this, for Emacs 22.1:
>
>   `where-is-internal' now returns nil for a remapped command (e.g.
>   `kill-line', when `my-mode' is enabled), and the actual key binding for
>   the command it is remapped to (e.g. C-k for my-kill-line).

Since kill-line is remapped to some other command, kill-line is not
on any keys, and so where-is-internal (in its default form) should
return nil (IMO).

> In ignorance, I'm thinking that the new 5th arg should be defined the other
> way 'round: nil should do what t does now, to give better backward
> compatibility. That way (I think), I would be able to do just
> (where-is-internal 'self-insert-command global-map) in all Emacs versions.

I don't mind such a change (where-is-internal is a low-level function
after all), but I strongly doubt you should be using it like you do in
the first place -- although I cannot tell you what to use instead :-).

-- 
Kim F. Storm <address@hidden> http://www.cua.dk