Re: ILC2005: McCarthy denounces Common Lisp, "Lisp", XML, and Rahul

[Kevin Rodgers]

Pascal Bourguignon wrote:
> Ivan Boldyrev <boldyrev+nospam@cgitftp.uiggm.nsc.ru> 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