Path: utzoo!utgpu!news-server.csri.toronto.edu!cs.utexas.edu!sun-barr!olivea!uunet!jarthur!ucivax!orion.oac.uci.edu!ucsd!ucbvax!ANDREW.CMU.EDU!wjh+
From: wjh+@ANDREW.CMU.EDU (Fred Hansen)
Newsgroups: comp.soft-sys.andrew
Subject: Re: GNU emacs compatibility.
Message-ID: <8bnGKke00VsP81E1QD@andrew.cmu.edu>
Date: 28 Feb 91 15:45:52 GMT
References: <obmhBhYGG02=19=3lt@athena.mit.edu>
Sender: daemon@ucbvax.BERKELEY.EDU
Organization: The Internet
Lines: 26

Okay, here is the gnu-emacs style transpose function.  Ready-to-wear.

Fred Hansen


---- Enclosure ----
-- Gnu Emacs style character transpose
--
--	Installation:  
--		1. install this file in <full pathname of this file>
--		2. change ~/.atkinit to include
--			load ness
--			call ness-load <full pathname of this file>
--	(after patch 10, this file will be in $ANDREWDIR/lib/ness)
--
--	Usage:
--		In any textview, type control-t. 
--		The two characters adjacent to the caret will be interchanged
--		and the caret will advance to after the second.

extend "view:textview" on keys ""
	textview_forward_character(currentinset)
	textview_twiddle_chars(currentinset)
end keys end extend

---- Enclosure ----