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

[Kevin Rodgers <ihs_4664@yahoo.com>]

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