" .exrc - ex/vi startup file
" Steve Kinzler, kinzler@cs.indiana.edu, Apr 96/Jul 98
" http://www.cs.indiana.edu/~kinzler/home.html#vi
"
set redraw noshowmatch tags=tags\ /u/kinzler/etc/tags
"
" Used buffers:
" m = vi commands
" x = staging between X11 cut buffer
" Used marks:
" p = temporary point
"
" Overrides: ^N (= j), ^\ (= Q)
map 
	:w
map 	:ta 
map 	:n
map 	:e 
map 	:e! #
map \	:e #
map q	:q!
map g	1G
"
map 	, "mdd@m
map 	. !!exec csh
map 	> I% :t.
2x	.
"
map 	0 !Gstripmime -f | box
map 	1 !}exec fmt
map 	2 !}exec fmt -c
map 	3 mp:.t.
`plDja
k:s/./ /g
0r|jixkJx
map 	4 !!exec fmt
map 	5 !!exec fmt -c
map 	6 !!tab
map 	7 0	8	1	9
map 	8 mp}:'p,s/^[^ ] 
'p
map 	9 :,/^$/-s/^/| 
"
map 	;  	li
map 	li :map 	; 	nl
:se list
map 	nl :map 	; 	li
:se nolist
"
map 	cc /[^ -~]
map 	CC /[^ -~¡-ÿ]
map 	ct /[^ -~	]
map 	CT /[^ -~	¡-ÿ]
"
map 	fs gg/^Subject:
wwiFwd: 
map 	ft gg/^To:
yypIOrig-k0RCcOTo: 
map 	fw 	fs	ft
"
map 	el mp:,$s/[
 	][
 	]*$//
`p
map 	EL mp:%s/[
 	][
 	]*$//
`p
map 	sb !Gcat -s
map 	SB mpGo.:g/^$/,/./-j
Gdd`p
map 	kl mpA `p	el	sb
map 	KL mpA `p	EL	SB
"
map 	wb :w !exec xrshio - webrowse -m 
map 	we :w !exec xrshio - inbrowse -w

map 	wm :w !exec xrshio - webrowse -mw

map 	ws :w !exec xrshio - webrowse -sw

map 	wn :!exec webrowse -w %

map 	wt :!exec webrowse -t %

map 	wl :!exec webrowse %

" Note: "reload" doesn't appear to be supported by Mozilla yet
" http://www.mozilla.org/unix/remote.html
map 	ww :!exec webrowse -c reload

"
map 	a2 mpgg!Gexec ansi2latin
`p
map 	al !!exec align
map 	at gg!Gexec attach - -m 
map 	ap !}exec align
map 	b6 !}exec qp -b
map 	bp :r !exec boilerplate
o
map 	bx !Gexec box -n
map 	ci :se ic
map 	cl !!exec fill -c
map 	cp !}exec fill -c
map 	cs :se noic
map 	cu :!cutcust 
map 	db 0d/^- - - - 
O
map 	dh !Gexec stripmime -b
!Gexec minhdr -b
map 	dp mp%x`px
"ap 	dt 0	mHmp}d/^--[-p=][-a_][-ra][-tl]
d/^$
/^--[-p=][-a_][-ra][-tl]
dG'p
map 	dt !Gexec stripmime -a -b
!Gexec minhdr -m -b
map 	du mp:%s/_//g
:%s/\(.\)\1/\1/g
`p
map 	fe !Gexec fixmail
map 	hm O!!exec box -q
map 	hn O!!exec box -n -q
map 	lp !}exec fill -r 32768
map 	ll !Gexec fill -r 32768
map 	lx !!exec logik -X
map 	mb :w !$RSHCMD $RH mimebrowse -

map 	mh !}exec minhdr
map 	mH !}exec minhdr -m
map 	m !Gexec minhdr -b
map 	mM !}exec minhdr -m -r
map 	mx mpGoFrom `p/^From 
kmP?^From 
:,'Py x
:,'Pw !exec cutbuf

:,'Pd
Gdd``
map 	my mpGoFrom `p/^From 
kmP?^From 
:,'Py x
:,'Pw !exec cutbuf

Gdd`p
map 	nm /^From 
z
map 	pa :r !exec pa -e 
map 	pm ?^From 
z
map 	qp !Gexec qp
map 	rr oBcc: kinzler
Return-Receipt-To: kinzler@cs.indiana.edu
map 	ru :-r !exec ruler
map 	rw :rew
map 	sa :se all
map 	se :so .exrc
map 	sf :w !exec sendfile

map 	sg :r !exec sig
map 	sm :!exec scph '%' `hosts main`
map 	so :so ~oracle/post/.exrc
map 	sr :!exec scph '%' $REMOTEHOST
map 	tb !tab
map 	tu yyPishorten 'A'	.>>A	-or-j0
map 	tx !Gexec csh -c html2txt
map 	xc :w !cutcust `sed -n 's/^Subject: .*(\([a-z][a-z0-9/]*\)) *[0-9]*$/\1\/-/p' | sed 'y/\// /; 1q'`

map 	xg :1,$y x
:1,$w !exec cutbuf

map 	xi mp:r !cutbuf; echo Tz7O9kJg; echo gJk9O7zT
'pj0"xy/Tz7O9kJg
:,/gJk9O7zT/d
`p
map 	xo mpo
Tz7O9kJgk"xP:,/Tz7O9kJg/-w !exec cutbuf

:,/Tz7O9kJg/d
`p
map 	xu :w !sed -n 's/
//g; s/.*\([Uu]serid\|SSN\)[ 	]*[:=][ 	]*\([A-Z0-9][A-Z0-9]*\).*/\2/p' | sed 1q | tr -d '\012' | cutbuf

map 	xx "xygv:w !exec cutbuf

"
map 	un :"Unmapped: * _ v K V Y ^P ^V ^W ^^ ^_ TAB<string> @<buffer>
"
"" Overrides: ^T (indent)
map! 
	I
map! 	bi
map! 	A
map! 	lea
map! 	i
"ap! 	Da
"ap! 	a
map! 		xi"xpa
"ap! 	ja
"ap! 	^Da
"ap! 	ka
"ap! 	bdwi
"ap! 	Xpa
"ap! 	lxi
"ap! 	xi
"ap! 	
map! 	la
"
ab @c @cs.indiana.edu
ab @C @cs.indiana.edu
ab @u @umich.edu
ab @U @umich.edu
ab @w @www.hmrc.kines.umich.edu
ab @W @www.hmrc.kines.umich.edu