Pascal Bourguignon wrote:
> Ivan Boldyrev <[EMAIL PROTECTED]> writes:
>>What about
>>
>>(add-hook 'emacs-startup-hook
>> (lambda ()
>> (case window-system
>> ...)))
>
> (add-hook 'emacs-startup-hook
> (lambda ()
> (message "setting up the keyboard")
> (case window-system
> ((nil)
> (message "houra")
> (normal-erase-is-backspace-mode 1))
> ((x)
> (define-key global-map [(delete)] "\C-d")
> (make-face-bold 'bold-italic))
> ((mac)
> (setq mac-command-key-is-meta nil
> mac-reverse-ctrl-meta nil)
> (set-keyboard-coding-system 'mac-roman)))))
>
> I get:
> setting up the keyboard
> houra
> in the *Message*, but C-h is still delete-backward-char and DEL
delete-char.
I believe term-setup-hook is the correct place for that:
,----[ C-h v term-setup-hook RET ]
| term-setup-hook's value is nil
|
| Documentation:
| Normal hook run after loading terminal-specific Lisp code.
| It also follows `emacs-startup-hook'. This hook exists for users to set,
| so as to override the definitions made by the terminal-specific file.
| Emacs never sets this variable itself.
|
| Defined in `startup'.
`----
--
Kevin Rodgers
_______________________________________________
Help-gnu-emacs mailing list
Help-gnu-emacs@gnu.org
http://lists.gnu.org/mailman/listinfo/help-gnu-emacs