*BSD News Article 37086


Return to BSD News archive

Path: sserve!newshost.anu.edu.au!harbinger.cc.monash.edu.au!news.cs.su.oz.au!metro!wabbit.cc.uow.edu.au!picasso.cssc-syd.tansu.com.au!newshost!chrisb
From: chrisb@stork.cssc-syd.tansu.com.au (Chris Bitmead)
Newsgroups: comp.unix.bsd
Subject: Re: Make Emacs behave friendly
Date: 19 Oct 94 10:32:00
Organization: Telecom Australia - CSSC
Lines: 70
Message-ID: <CHRISB.94Oct19103200@stork.cssc-syd.tansu.com.au>
References: <37drep$7d6@olymp.informatik.uni-bonn.de>
NNTP-Posting-Host: stork.cssc-syd.tansu.com.au
In-reply-to: reinke@zeus.informatik.uni-bonn.de's message of 11 Oct 1994 11:03:53 GMT

In article <37drep$7d6@olymp.informatik.uni-bonn.de> reinke@zeus.informatik.uni-bonn.de (Joachim Reinke) writes:

>Hi!
>
>Does anyone have a .emacs configuration file, which teaches Emacs to
>
>  - behave WordStar compatible,
>  - know the Delete (in contrast to the BkSpace) key or
>  - know some of the extended keys of a Sun/SPARCstation keyboard (function
>    keys, PgUp, PgDn)?

We have these in our .emacs setup. I think it might be what's needed to
get Sun Page up etc. keys working. Give it a try anyway.

(global-set-key [help] 'help-for-help)
(global-set-key [f27] 'beginning-of-buffer)
(global-set-key [f29] 'scroll-down)
(global-set-key [f31] 'recenter)
(global-set-key [f33] 'end-of-buffer)
(global-set-key [f35] 'scroll-up)
(global-set-key [f24] 'call-last-kbd-macro)
(global-set-key [f25] 'start-kbd-macro)
(global-set-key [f26] 'end-kbd-macro)
(global-set-key [f11] 'keyboard-quit)
(global-set-key [f12] 'yank-pop)
(global-set-key [f13] 'delete-window)
(global-set-key [f14] 'undo)
(global-set-key [f16] 'copy-region-as-kill)
(global-set-key [f18] 'yank)
(global-set-key [f19] 'query-replace)
(global-set-key [f20] 'kill-region)
(global-set-key [f21] 'toggle-read-only)
(global-set-key [f1] '(lambda ()
			(interactive)
			(menu-bar-mode nil)
			(recenter)))
(global-set-key [f2] 'toggle-scroll-bar)
(global-set-key [f3] 'toggle-horizontal-scroll-bar)
(global-set-key [S-kp-6] 'forward-word)
(global-set-key [C-kp-6] 'end-of-line)
(global-set-key [S-kp-4] 'backward-word)
(global-set-key [C-kp-4] 'beginning-of-line)
(global-set-key [help] 'help-for-help)
(global-set-key [f27] 'beginning-of-buffer)
(global-set-key [f29] 'scroll-down)
(global-set-key [f31] 'recenter)
(global-set-key [f33] 'end-of-buffer)
(global-set-key [f35] 'scroll-up)
(global-set-key [f24] 'call-last-kbd-macro)
(global-set-key [f25] 'start-kbd-macro)
(global-set-key [f26] 'end-kbd-macro)
(global-set-key [f11] 'keyboard-quit)
(global-set-key [f12] 'yank-pop)
(global-set-key [f13] 'delete-window)
(global-set-key [f14] 'undo)
(global-set-key [f16] 'copy-region-as-kill)
(global-set-key [f18] 'yank)
(global-set-key [f19] 'query-replace)
(global-set-key [f20] 'kill-region)
(global-set-key [f21] 'toggle-read-only)
(global-set-key [f1] '(lambda ()
			(interactive)
			(menu-bar-mode nil)
			(recenter)))
(global-set-key [f2] 'toggle-scroll-bar)
(global-set-key [f3] 'toggle-horizontal-scroll-bar)
(global-set-key [S-kp-6] 'forward-word)
(global-set-key [C-kp-6] 'end-of-line)
(global-set-key [S-kp-4] 'backward-word)
(global-set-key [C-kp-4] 'beginning-of-line)