switch($TERM)
case "rxvt":
case "screen*":
case "xterm*":
set TITLE = "%{\033]0;%n@%m:%~\007%}"
breaksw
default:
set TITLE = ""
breaksw
endsw
set prompt = "${TITLE}%n@%m:%~%# "
unset TITLE