Re: Problem: Keymap not working...

[Kevin Rodgers]

upro wrote:
> IU am writing a small mode for my daily work, but the keymap is not
> working. Can someone please tell me, why?
>
> I am using emacs 21.3 (btw: How do I get the minibuffer output
> [e. g. on M-x emacs.version] to point in the main buffer?).
>
> This is my smal function:
>
> (defvar musman-mode-map
>   (let ((musman-mode-map (make-sparse-keymap)))
> ;  (if musman-mode-map ()
> ;  (setq musman-mode-map (make-sparse-keymap))
>     (define-key musman-mode-map "\C-ck" 'musman-Konzert)
>     (define-key musman-mode-map "\C-ct" 'musman-Termin)
>     (define-key musman-mode-map "\C-ca" 'musman-Anrufen)
>     (define-key musman-mode-map "\C-c\C-g" 'musman-Angerufen)
>     (define-key musman-mode-map "\C-c n" 'musman-N?chster)
>     (define-key musman-mode-map "\C-c t" 'musman-Terminauswahl)
>     (define-key musman-mode-map "\C-c v" 'musman-Vertrag)
>     (define-key musman-mode-map "\C-c z" 'musman-Zur?ckrufen)))

You need to return the keymap from the let form, so that it is bound to
the variable.  Also, it's not a bug but it is a little confusing to use
the name of the global variable as the name of the local variable:

(defvar musman-mode-map
  (let ((map (make-sparse-keymap)))
    (define-key musman-mode-map "\C-ck" 'musman-Konzert)
...
    (define-key musman-mode-map "\C-c z" 'musman-Zurückrufen)
    map))

--
Kevin Rodgers