[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
RE: How to get current keymap
From: |
Drew Adams |
Subject: |
RE: How to get current keymap |
Date: |
Sun, 7 Dec 2008 09:33:08 -0800 |
> >> I used (concat (symbol-name major-mode) "-map") to get
> >> current keymap, but it failed for LaTeX mode. Are there
> >> other methode to get current keymap.
> >
> > If I enter a buffer, do `M-x latex-mode',
> > then M-: (concat (symbol-name major-mode) "-map")
> > it returns "latex-mode-map". What did you want?
> >
> > That's the name of a symbol whose value is the latex mode
> > keymap. If you want the keymap itself, then you want this:
> >
> > (symbol-value ; Value of
> > (intern ; Symbol whose name is
> > (concat (symbol-name major-mode) "-map")))
> >
> > However, (current-local-map) gives you the same thing, and
> > it works regardless of the name of the symbol.
> >
> > (eq (symbol-value
> > (intern
> > (concat (symbol-name major-mode) "-map")))
> > (current-local-map))
> >
> > => t
>
> A different way to find the symbol, instead of relying on its name:
>
> (when (current-local-map)
> (let ((result nil))
> (mapatoms (function (lambda (symbol)
> (when (and (boundp symbol)
> (eq (symbol-value symbol)
> (current-local-map)))
> (push symbol result)))))
> result))
Yes. To be clear, I didn't mean to suggest that one should use the
map-variable's name, or that the above `eq' sexp would always return t. What I
meant was that, for _LaTeX_ mode, the two expressions are `eq'. I should have
made that clear. My point was to _not_ rely on the name, but to use
`current-local-map' instead.
Most uses of keymaps never require knowing the map variable itself; its value
can be used directly. But if for some reason one needs the map variable, then
the code you provided is the way to go.