#How to read this:
#	command	equivalence
#	#	description (if available)


alias   cb 'chbox'

#alias  chbox '/usr/athena/bin/pick last \!:1 >/dev/null'
alias   chbox 'echo "Current-Folder: \!:1" | sed s/+// >! ~/Mail/context'
#	#chbox	allows you to change folders fast without scanning

alias	comp mycomp

alias   e comp

alias	i inc
alias   inc /mit/belg4mit/bin/myinc

alias   ir 'echo "Die Heretic Scum!"; inc && rmm pseq'

alias   is 'inc; show'

alias	folders 'folders \!:* | $PAGER'

alias	l 'scan last:\!*'
#	#l (n)	scan last (n) messages
#       #f isn't used as first since it's taken for finger
alias   l7  'scan last:7'
#	#a common typo

alias	n next
alias	p prev

alias	pack 'folder -pack'
#	#pack	pack a mail folder

alias	pick 'pick -list `echo \!* | sed s/--/-/`'
#	#pick	allow GNU style long-form option names

alias   pscan 'scan `pick \!:*`'
#	#pscan  pick options to scan

alias	r rmm

alias   rep '/usr/athena/bin/repl -form /usr/athena/etc/replcomps'
#       #Reply without any customizations

alias	rn 'rmm \!*; next'
#	#rn	rmm then next
alias	rp 'rmm \!*; prev'
#	#rp	rmm then next

alias	s show

#alias	scan 'sh -c "scan \!* 2>/dev/null | $PAGER"'
#	#To avoid error messages e.g. blank place-holder files
alias	scan 'scan \!* | $PAGER'

alias   seen 'mark -sequence unseen -delete \!*'

alias	shoe show
#	#a common typo...

alias   sd 'scan +drafts'
alias	si 'scan +inbox'
alias   so 'scan +outbox'

alias	ur 'set box = `cat ~/Mail/context`; undelete ~/Mail/$box[2]/\!*'
#	#ur	un-rmm's mesages

#The following allows tab completion for folder names, like for filenames
#try scan +i[tab]
#if( $hosttype != "linux")then #tcsh on Sun used to have problems
#	complete {chbox,pick,refile,s,scan,show} "c@+@p:/$HOME/Mail/@"
#else
	complete {chbox,pick,refile,s,scan,show} "c@+@D:/$HOME/Mail/@"
#endif

#Trash folder
alias	rmm 'refile -normmproc \!* +Trash'
alias	empty '/usr/athena/bin/rmm +Trash \!*; folder -pack'
#	#I run empty first:300 about once a week
#I need a ur that works with Trash