Xref: utzoo comp.emacs:8690 gnu.emacs:3270
Path: utzoo!utgpu!news-server.csri.toronto.edu!cs.utexas.edu!usc!trwind!venice!baur
From: baur@venice.SEDD.TRW.COM (Steven L. Baur)
Newsgroups: comp.emacs,gnu.emacs
Subject: Re: Binding Sparc Function Keys
Message-ID: <667@venice.SEDD.TRW.COM>
Date: 14 Jul 90 20:42:32 GMT
References: <9420@rice-chex.ai.mit.edu>
Organization: TRW Systems Engineering & Development Division, Redondo Beach, CA
Lines: 34

From article <9420@rice-chex.ai.mit.edu>, by sbchanin@wheaties.ai.mit.edu (Steve Chanin):
> 
>      I'm running epoch (Emacs 18.55 with enhanced X support) on a
> Sparc and I'd like to be able to bind the machine's function keys to
> emacs functions, but I'm not sure how to specify them, i.e.
> 	(global-set-key "WHAT-GOES-HERE" 'find-file)
> but I don't know what to put between the quotes for F1 (for example).
> If anyone out there has done this, I'd appreciate finding out how
> (theory is ok, but example elisp code would be especially welcome).
> Either email me directly (sbchanin@ai.mit.edu) or reply to the net.


From my .emacs (all extraneous stuff removed):

(global-set-key "\C-Xn" 'other-window)
(global-set-key "\C-Xp" 'prev-window)
;;; (global-set-key "\C-h" 'delete-backward-char)
(global-set-key "\C-X\C-E" 'compile)
(global-set-key "\C-X\C-I" 'insert-file)
(global-set-key "\C-T" 'my-transpose-chars)
	(global-set-key "\C-[[29~" 'execute-extended-command)
	(global-set-key "\C-[[1~" 're-search-forward)
	(global-set-key "\C-[[2~" 'yank)
	(global-set-key "\C-[[3~" 'kill-region)
	(global-set-key "\C-[[4~" 'set-mark-command)
	(global-set-key "\C-[[5~" 'scroll-down)
	(global-set-key "\C-[[6~" 'scroll-up)
	(global-set-key "\C-X\C-C" 'exit-emacs))
    (global-set-key "\C-X\C-C" 'exit-emacs)
(global-set-key "\C-?" 'delete-backward-char)


--
steve	baur@venice.SEDD.TRW.COM