adding perl-mode menu

adding perl-mode menu

[bluj]

Hello,
I have used emacs for quite a while, but have never delved into
customization or lisp.
I would like to add a menu in emacs, only in the perl major mode.

I thought that this would do it:

(define-key perl-mode-map [menu-bar cust]
  (cons "Cust" (make-sparse-keymap "Cust")))

what am i doing wrong???? if i change perl-mode-map to global-map i am
fine...
Why is there no documentation on this for gnu emacs??? If someone can
point me to a doc that goes into specifics about this, I would be
greatful. The faq only covers adding to global-map....

thanks
jonathan

Re: adding perl-mode menu

[Stefan Monnier]

> I thought that this would do it:

> (define-key perl-mode-map [menu-bar cust]
>   (cons "Cust" (make-sparse-keymap "Cust")))

> what am i doing wrong????

Nothing at first sight.  Tell us where/when you do it and what happens.


        Stefan

Re: adding perl-mode menu

[bluj]

i put thjs in my .emacs file and it complains... it only works when it
is set to global-map. It doesnt seem to recognize perl-mode-map....

jonathan

Re: adding perl-mode menu

[Stefan Monnier]

> i put this in my .emacs file and it complains...

A good habit is to give too much info.  Much better than too little.
Basically, just assume we're 100% pure idiot.  Just saying "complains" is
not enough.

> it only works when it is set to global-map.  It doesnt seem to recognize
> perl-mode-map....

That's because perl-mode-map is only created when perl-mode is loaded which
only happens when you open a Perl file.

You can do

  (defun my-perl-hook ()
    (define-key perl-mode-map [menu-bar cust]
      (cons "Cust" (make-sparse-keymap "Cust"))))
  (add-hook 'perl-mode-hook 'my-perl-hook)


-- Stefan

Re: adding perl-mode menu

[bluj]

looks like i am the idiot Stefan ;). 
Thanks very much

jonathan