Binding Keymap prefix to Major Mode

Binding Keymap prefix to Major Mode

[Tim Johnson]

Hi:
I've been working on a major mode for the rebol programming language.
The following code has been evaluated:
(defvar rebol-keymap (make-sparse-keymap) "Rebol mode keymap")
(defcustom rebol-keymap-prefix [(control ?')]
   "*Keymap prefix string for rebol-keymap"
   :type 'string
   :group 'rebol)
(local-set-key rebol-keymap-prefix rebol-keymap)
(define-key rebol-keymap "b" 'previous-rebol-definition)
;; When I load a file that auto-loads the mode, I find
;; that "b" is bound to 'previous-rebol-definition, not
;; to "\C-' b" which is what I hope for.
NOTE: I've tried [(control \')] and [(control c)(control c)]
as prefix symbols with the same (lack of) results.
I presume that something else needs to be done to properly bind
this prefix to the keymap.

All help, docs and examples are welcome.

TIA
Tim

Re: Binding Keymap prefix to Major Mode

[rgb]

Tim Johnson wrote:
> Hi:
> I've been working on a major mode for the rebol programming language.
> The following code has been evaluated:
> (defvar rebol-keymap (make-sparse-keymap) "Rebol mode keymap")
> (defcustom rebol-keymap-prefix [(control ?')]
>    "*Keymap prefix string for rebol-keymap"
>    :type 'string
>    :group 'rebol)
> (local-set-key rebol-keymap-prefix rebol-keymap)
> (define-key rebol-keymap "b" 'previous-rebol-definition)
> ;; When I load a file that auto-loads the mode, I find
> ;; that "b" is bound to 'previous-rebol-definition, not
> ;; to "\C-' b" which is what I hope for.
> NOTE: I've tried [(control \')] and [(control c)(control c)]
> as prefix symbols with the same (lack of) results.
> I presume that something else needs to be done to properly bind
> this prefix to the keymap.
>
> All help, docs and examples are welcome.
>
It works for me.
I'm thinking the problem is in your rebol-mode function.
What does your (use-local-map ...) statement look like?
If it says (use-local-map rebol-keymap) that would
certainly explain it.

Re: Binding Keymap prefix to Major Mode

[Tim Johnson]

rgb wrote:
<...>
> It works for me.
> I'm thinking the problem is in your rebol-mode function.
> What does your (use-local-map ...) statement look like?
> If it says (use-local-map rebol-keymap) that would
> certainly explain it.

Hello rgb:
   You're right! What would be the correct form?
thanks
tim

Re: Binding Keymap prefix to Major Mode

[Stefan Monnier]

> (defvar rebol-keymap (make-sparse-keymap) "Rebol mode keymap")
> (defcustom rebol-keymap-prefix [(control ?')]
>    "*Keymap prefix string for rebol-keymap"
>    :type 'string
>    :group 'rebol)
> (local-set-key rebol-keymap-prefix rebol-keymap)
> (define-key rebol-keymap "b" 'previous-rebol-definition)

Seeing the code above, I *strongly* suggest you google for "sample-mode.el"
and try to start from that instead.


        Stefan

Re: Binding Keymap prefix to Major Mode

[Tim Johnson]

Stefan Monnier wrote:
>>(defvar rebol-keymap (make-sparse-keymap) "Rebol mode keymap")
>>(defcustom rebol-keymap-prefix [(control ?')]
>>   "*Keymap prefix string for rebol-keymap"
>>   :type 'string
>>   :group 'rebol)
>>(local-set-key rebol-keymap-prefix rebol-keymap)
>>(define-key rebol-keymap "b" 'previous-rebol-definition)
> 
> 
> Seeing the code above, I *strongly* suggest you google for "sample-mode.el"
> and try to start from that instead.
> 
> 
>         Stefan

Hello Stefan:

Thank you very much,that is something that I have been looking for - an 
example of how to set up a mode.

FYI: The solution has proven to be just to change
(use-local-map rebol-keymap)  ;; to
(local-set-key rebol-keymap-prefix rebol-keymap)

Now keybindings work as I would expect them to.

I have googled for "sample-mode.el" and have found only two
references, but no code. In fact what I find are emails from
you and since you appear to be the author, I would deeply appreciate it
if you could provide a link for this file.

Regards
Tim Johnson
   ----------------------------
   Senior Programer/Analyst
   Alaska Internet Solutions

Re: Binding Keymap prefix to Major Mode

[Daniel Wright]

Tim Johnson wrote:
> I have googled for "sample-mode.el" and have found only two
Hi Tim,
Try googling for "emacswiki samplemode".
Many greetings,
Daniel.

Re: Binding Keymap prefix to Major Mode

[Tim Johnson]

Daniel Wright wrote:
> Tim Johnson wrote:
> 
>> I have googled for "sample-mode.el" and have found only two
> 
> Hi Tim,
> Try googling for "emacswiki samplemode".
> Many greetings,
> Daniel.
Thanks! This is great! Just what I have been
looking for.
tj