# -*- ksh -*-

# set echo
# mesg y

# skip
#if [[ -n "$IN_LESSOPEN" ]]; exit

# for `su' only PATH is changed
case "$PATH" in
  */usr/contrib/bin*)
    ;;
  *)
    if [[ $USERNAME == "root" ]]; then
      export PATH=/usr/local/etc:~/bin:/usr/contrib/bin:${PATH}:/usr/etc:/usr/bsd:/usr/local/bin:/usr/local/netpbm
    else
      export PATH=~/bin:/usr/contrib/bin:/usr/java/bin:${PATH}:/usr/etc:/usr/bsd:/usr/local/bin:/usr/local/netpbm:/usr/apps/cyberware/headus/bin:/usr/apps/cyberware/echo/bin
    fi

    # prepend O2 binaries for CI hosts
    if [[ $HOST != "mecca" ]]; then
      export PATH=/usr/contrib/bin/O2:$PATH
    fi
    ;;
esac


if [[ -z "$ENV_SET" ]]; then
  umask 022


  export CYSURF_HOME=/usr/apps/cyberware/headus
  export ECHO_DIR=/usr/apps/cyberware/echo
  export ECHO_CFG=/usr/apps/cyberware/echo/echo1143.cfg

  export EXPLORERUSERHOME=/usr/contrib/apps/explorer

  export PVM_ROOT=/usr/contrib/apps/pvm3
  export PVM_ARCH=SGIMP

  export HOST_ABBR=`echo $HOST`: # | sed 's/\(...\).*/\1:/'`

  export CI_GROUP='damill01 tjchol01 a0mali01 aglozo01 zjlata01 a0wise01 jmzura02 bprete01'

  export CI_HOSTS="aivo agy ubongo mozg"
  export EGYPT_HOSTS=mecca
  #,egypt,cairo,sinai,mitghmr,pyramid,aswan,suiez,alexandria,nile,sphinx,cleopatra
  export EGYPT_HOSTL="mecca"

  # export CVSROOT=$HOME/src/master
  #  export RCSINIT='-zLT'
  export MAP3270=~/.map3270

  export TEXINPUTS=".:./figures:$HOME/tex/inputs:"
  export BIBINPUTS="$HOME/tex/bib:"
  export BSTINPUTS=".:$HOME/tex/bib:"
  #  export INDEXSTYLE="/soft/tex/lib/texmf/tex/MakeIndex"
  #  export BIBINPUTS="/soft/tex/lib/texmf/bibtex/bib:/soft/tex/lib/texmf/bibtex/bib/chaos:$HOME/lib/tex/bib:"

  #   export AVS_PATH=/cnode/orion/tmp/wuja/avs
  #    export LM_LICENSE_FILE=~/avs/`hostname`.avs


  #if ($?REMOTEHOST) then
  #  if ($?TERM) then
  #    if ($TERM == "xterm" || $TERM == "vt300") then
  #      export DISPLAY=${REMOTEHOST}:0.0
  #    endif
  #  endif
  #endif

  export XEMACS_SERVER=xemacs-beta
#  export XEMACS=xemacs #_client
  export XEMACS=xemacs-beta
  export EDITOR=$XEMACS
  export CSHEDIT=$EDITOR
  export VISUAL=$EDITOR

  export PAGER='less'
  export LESS='-Msei'
# export LESS=-cx3Me
# export PAGER='more'  # default

  export GCC_BOUNDS_OPTS='-no-message -array-index-check -never-fatal'

  export LS_COLORS='no=00:fi=00:di=34;1:ln=36;1:pi=40;33;1:so=35;1:bd=40;33;1:cd=40;33;1:ex=32;1:*.arj=31;1:*.zip=31;1:*.Z=31;1:*.bz2=31;1:*.gz=31;1:*.tgz=31;1:*.tex=33;1:*.mp=33;1:*.w=33;1:*.mma=33;1:*.html=33;1:*.java=33;1'

  export XENVIRONMENT=$HOME/.Xdefaults
  # see XtResolvePathname (3) for an explanation
  foot=%T/%N%C%S
  bart=%T/%N%S

  case "$HOST" in
    mecca | aivo | agy | ubongo | mozg)
      if [[ "$HOST" == mecca ]]; then
        export MAKEFLAGS='-j -l 32'                    # many parallel jobs
      fi

      # /usr/bin before chaos
      export MANPATH=~/man:/usr/contrib/man:/usr/local/man:/usr/share/catman:/usr/share/man

      # for configure cache
      export CONFIG_SITE=/usr/contrib/share/config.site

      export TERMINFO=/usr/contrib/lib/tjchol01/terminfo
#      export LD_LIBRARY_PATH=/usr/local/lib
      export MAIL=/var/mail/$LOGNAME
      export LESSOPEN='| /usr/contrib/lib/less/lesspipe.sh %s'
#      export LESSOPEN='| env IN_LESSOPEN=yes /usr/contrib/lib/less/lesspipe.sh %s'
#      export LTX2XTABLES=.:/usr/contrib/lib/config/ltx2x

      # X options
      export XFILESEARCHPATH=/usr/contrib/lib/X11/${foot}:/usr/contrib/lib/X11/${bart}:/usr/X11R6/lib/X11/${foot}:/usr/X11R6/lib/X11/${bart}:/usr/lib/X11/${foot}:/usr/lib/X11/${bart}:%D
#      export XUSERFILESEARCHPATH=$XFILESEARCHPATH
      ;;

    *)
      echo "What host is $HOST/$OSTYPE ?"
      ;;
  esac

  unset {foot,bart}

  export ENV_SET=yes
fi  ###  -z $ENV_SET

if [[ -n "$ENVONLY" ]] return 0

#-----------------------------------------------------------------
#-----------------------------------------------------------------
case "$HOST" in
  mecca | aivo | agy | ubongo | mozg)
    cdpath=(.. ~ ~/src /usr/contrib/src)

      if [[ $USERNAME == "root" ]]; then
        for a in "${=CI_HOSTS}"; do
          $a() {
            if [[ -n "$*" ]]; then
              /usr/bsd/rsh $0 -l systom "(cd $PWD && $*)"
            else
              /usr/bsd/rsh $0 -l systom
            fi
          }
        done
      fi

mc() { cd `/usr/contrib/bin/mc -P $*` }

    alias systom='su systom'
  #    alias mc='export MC=`/usr/contrib/bin/mc -P *`; cd $MC; unset MC'

    alias ldd='elfdump -L' # was -Dl
    alias truss='par -a 4096 -b 4096 -s -SS'

    alias lpn='lp -dnab319ps'
    zlpn() { zcat $* | lp -d nab319ps }
    alias lpns='lpstat nab319ps'
    alias lpnc='cancel -a nab319ps'

    alias lps='lp -dwssp225ps'
    zlps() { zcat $* | lp -d wssp225ps }
    alias lpss='lpstat wssp225ps'
    alias lpsc='cancel -a wssp225ps'
    alias lpse='starbase enable wssp225ps'
    alias lpsd='starbase disable wssp225ps'

    lpm() { cat $* | starbase lp -d wssp220lj }
    alias lpms='starbase lpstat wssp220lj'
    alias lpmc='starbase cancel -a wssp220lj'

    alias cdx='pd /usr/contrib/stow/xemacs-beta/lib/'
    alias cdl='pd /usr/contrib/share/xemacs/site-lisp'
    alias cdt='pd /usr/contrib/share/texmf/tex'

#    alias top='top -i1'
    if [[ -x /usr/contrib/bin/ls ]]; then
      alias ls='/usr/contrib/bin/ls -F --color=tty'
    fi
  ;;

  *)
    echo "WHAT HOST IS $HOST/$OSTYPE ?"
  ;;
esac

#-----------------------------------------------------------------
#if [[ -z $PS1 ]]; exit
#-----------------------------------------------------------------

if [[ -n "$TERM" && -o interactive ]]; then # interactive shell
  #if ( { /usr/bin/tty -s } ) then
  if [[ -x /usr/contrib/bin/fortune ]]; then
    /usr/contrib/bin/fortune
    echo ""
  fi
  stty dsusp ^- susp ^Z  kill ^U intr ^C eof ^D start ^Q stop ^S hupcl -ixon -ixoff erase ^H
#  ttyctl -f
  # erase ^\? quit ^O
  if [[ "$TERM" == "xterm" || "$TERM" == "xterm-color" ]]; then

# Function executed by zsh when directory changed to put directory
# in xterm title.  Also make sure it is set immediately when new
# xterm started.
#     echo -n "\e]2;$HOSTNAME:$PWD\007"
#     function precmd () {
#       echo -n "\e]2;$HOSTNAME:$PWD\007\e]1;$HOSTNAME\007"
#     }
    chpwd() {
#      echo -n "\e]2;$HOST: $PWD\e]1;$HOST"
      print -Pn "\e]2;$USERNAME@$HOST: %~\a\e]1;$HOST\a;"
    }
    chpwd
  fi
fi

#
# shell settings
#
hosts=(
  biomed.eti.pg.gda.pl
  homer.louisville.edu
  mug3.ue.eti.pg.gda.pl
  orion.spd.louisville.edu
  starbase.spd.louisville.edu
  talos.spd.louisville.edu
  $EGYPT_HOSTS
)

setopt \
always_to_end \
append_history \
auto_list \
auto_menu \
auto_name_dirs \
auto_param_keys \
auto_pushd \
auto_resume \
bad_pattern \
complete_in_word \
correct \
correct_all \
equals \
extended_glob \
glob_dots \
hist_ignore_dups \
ignore_eof \
interactive_comments \
list_beep \
list_types \
magic_equal_subst \
mark_dirs \
multios \
nomatch \
notify \
numeric_glob_sort \
short_loops

unsetopt \
auto_cd \
auto_remove_slash \
bg_nice \
cdable_vars \
hist_ignore_space \
mail_warning \
null_glob \
print_exit_value \
rm_star_silent

READNULLCMD=$PAGER
REPORTTIME=60

MAILCHECK=1
unset MAILCHECK
watch=(all)
LOGCHECK=1
fignore=(.o .hi)
#unset autologout

# remove duplicates
typeset -U PATH MANPATH fignore

# Where to look for autoloaded function definitions
fpath=(~/.zfunc)

# Autoload all shell functions from all directories in $fpath that have
# the executable bit on (the executable bit is not necessary, but gives
# you an easy way to stop the autoloading of a particular shell
# function).
alias run-help=run-help

for dirname in $fpath; do
  if [[ -r $dirname ]] autoload $dirname/*(.x:t)
done
#autoload ~/fns/*(:t)

export HELPDIR=/usr/contrib/share/zsh/help  # directory for run-help function to find docs

#histlit \
#listjobs=long \
#rmstar \

HISTSIZE=1000
LISTMAX=0

WORDCHARS='*?_-.[]~=&;!#$%^(){}<>'  # `/' not included

#
# prompts
#
function precmd {
  if jobs % >& /dev/null; then
    psvar=("*")
  else
    psvar=("")
  fi
}

PS1="%B%{%}${HOST_ABBR}%(#.%/%{%}#.%~%1v>)%b "    # root's prompt has absolute paths
RPS1=' %B%@%b'                  # prompt for right side of screen
PS2="%B%_>%b "
PS3="%B%?#%b "
PS4=`print -P "%B+%b "`
SPROMPT="%Bzsh: correct '%R' to '%r' [nyae]?%b "

#
# keys
#
bindkey -e               # emacs key bindings
bindkey ' ' magic-space  # also do history expansion on space
bindkey "\ef" emacs-forward-word
#bindkey -m                      # metafy

bindkey "\e[Z" reverse-menu-complete # shift tab

# bindkey ^R i-search-back
bindkey -s "\eOA" "\e[A"
bindkey -s "\eOB" "\e[B"
bindkey -s "\eOC" "\e[C"
bindkey -s "\eOD" "\e[D"

# home, end, delete
bindkey -s "\e[4~" "
"
bindkey -s "\e[1~" ""
bindkey -s "\e[3~" ""
# popd, pushd
# bindkey -s "\e[5~" "popd\n"
# bindkey -s "\e[6~" "pushd .\n"

#bindkey "\e1" cdx


# Shell functions
setenv() { export $1=$2 }  # csh compatibility

# Global aliases
# alias -g M='|m'

#
# aliases
#
alias untic='infocmp'

alias vt100="export TERM=vt100-nam"
alias vt220="export TERM=vt220"
alias vt320="export TERM=vt320"

alias psw="ps -fu $USER | egrep -v 'ps -fu|egrep -v ps -fu'"
alias pst="pstree -wu $USER"

alias q='quota -v | grep -v "      0      0      0                  0      0      1"'
alias x=exit
alias up='cd ..'
alias ..='cd ..'
alias ...='cd ../..'
alias ....='cd ../../..'
alias .....='cd ../../../..'

# disable spelling correction
for a in mv cp touch echo autoload; do
  alias $a="nocorrect $a"
done

alias md='nocorrect mkdir -p'

mdd() { md $1 ; cd $1 }
alias rd=rmdir

#alias +w=chmod u+w
#alias -w=chmod -w

alias pd=pushd
alias pd2=pushd +2
alias pd3=pushd +3
alias pd4=pushd +4
alias po=popd



if [[ -z "$DISPLAY" ]]; then
  e() { $XEMACS "$@" }
else
  e() { $XEMACS "$@" &! }
#  e() { $XEMACS "$@" < /dev/null >& /dev/null & }
fi

alias l=ls
alias ll='ls -lF' # G
lll() { ls --color=yes -laF $* | $PAGER -rE }
alias lm='lll'
alias la='ls -laF'
lw() { ll -LU `where $* | grep -v aliased` } # unsorted dereferenced
lo() { ll `locate $*` }

# List only directories and symbolic links that point to directories
alias lsd='ls -ld *(-/DN)'


alias m=$PAGER
fm() { fold $* | m -r }                        # temporary
alias mR='m README'
alias mM='m Makefile'
mw() { m `where $* | grep -v aliased` }
mo() { m `locate $*` }


nms() { tbl $* | nroff -ms | m } # nroff -ms
tms()  { tbl $* | troff -t -ms | m } # troff -ms
#alias mman='groff -Tascii -man \!* | m'
# get rid of stupid Fortran pages
man() { $PAGER `/bin/man -w $* | egrep -v "/ftn/|No manual entry"` }
mman() { neqn $* | tbl | nroff -man | $PAGER }

#tbl -TX /usr/contrib/man/man1/fvwm2.1 | neqn /usr/pub/eqnchar - | nroff -i /usr/lib/tmac/tmac.an | col| less -Msei


ggrep() {
  find . -not -name \*.elc -not -name \*.o -type f -exec egrep $* {} /dev/null \;
}

unman() { cat $* | sed s/.\//g }
unshar() { sed "1,/^#/d" $* | sh }

alias gtart='gtar tvzf'
alias gtarx='gtar xvzf'
alias gtarc='gtar cvzf'
alias btart='gtar tvIf'
alias btarx='gtar xvIf'
alias btarc='gtar cvIf'

alias bf='find . -name'
wd() { wdiff -t $* | m }
lookat() { $1 xwd -root -display ${1}:0 | xwud }
alias reload="xrdb -nocpp -merge $HOME/.Xdefaults"


#
# specific programs
#
alias xdvi='xdvi -hushspecials -expert -allowshell -bg white -fg black'
alias xdvia='xdvia -hushspecials -allowshell -bg white -fg black'
alias ghostview='ghostview -bg white -fg black'
zgv() { zcat $* | gv }

alias pine='pine -d 0'
alias agdb='avs_dbx -debug gdb'
alias adbedit='sed -e s/! .*[+-].*$// -e s/^.*+0x\(.*\):/\1/ -e s/^.*+\(.*\):/\1/ -e s/^\(.*\):.*\1/\1/'

alias scr='screen'
alias scrr='screen -r'
alias scrl='screen -ls'

alias dvi2tty='dvi2tty -w132'
dvgt() { /usr/contrib/bin/dvgt $1 | rawtty }
dv() {
  tmp=/tmp/dvgtp$$.dvi
  dvicopy $1 $tmp > /dev/null
  /usr/contrib/bin/dvgt $tmp | rawtty
  rm $tmp
}
dvit() { dvi2tty -w132 $* | m }

alias reset='tput reset'
#
# internet services
#
alias netfind="fep rlogin mudhoney.micro.umn.edu -l netfind -P"
alias netfind1="fep rlogin redmont.cis.uab.edu -l netfind -P"
alias netfind2="fep telnet -P bruno.cs.colorado.edu"
alias netfind3="fep rlogin netfind.icm.edu.pl -l netfind -P"

alias de="rlogin -l de netfind.icm.edu.pl"
alias sunsolve='rlogin -l sunsolve sunsolve1.sun.com'

#alias whois='whois -h rs.internic.net'
alias weather='lynx gopher://UKCC.uky.edu/1menu%20WSERVICE%21191/WEATHLOU.INFO'
alias weather1='lynx gopher://UKCC.uky.edu/1menu%20WSERVICE%21191/WEATHER.INFO'
alias subway="xhost +metro.jussieu.fr; telnet metro.jussieu.fr 10000"
alias faq='ftp rtfm.mit.edu'
alias minerva1='tn3270 ulkyvm'
alias scrabble1='telnet eel.st.usm.edu 7777'
alias scrabble2='telnet next7.cas.muohio.edu 8888'
alias yahoo='lynx http://www.yahoo.com/'

alias etalk='$XEMACS -f etalk-batch'
alias gnus='$XEMACS -f gnus'
alias vm='$XEMACS -f vm'
alias w3='$XEMACS -f w3'
alias ecompile='$XEMACS -batch -f batch-byte-compile'

alias lynx='lynx -cache=1000'
alias netscape='netscape-beta -install'

alias ap='a2ps -p -nH -ns -1'
alias xbouncebits='xbouncebits -glide -copies 20 xlogo16'

alias rn="echo kuku"
alias we="echo kuku"

# quote and makealias --=Get quoting right in csh aliases
alias quote="/bin/sed -e 's/\\!/\\\\\!/g' -e 's/'\\\''/'\\\'\\\\\\\'\\\''/g' -e 's/^/'\''/' -e 's/"\$"/'\''/'"
alias makealias="quote | /bin/sed 's/^/alias \!:1=/' \!:2*"

# line length, no justify, no hyphenation, page length
alias nr_fmt='sed "1i .ll72 .na .hy 0 .pl 1" $* | nroff'

alias ftp='ncftp -d1 -r'
alias ncftp='ncftp'
alias ytalk=ytalk.fast
alias talk=ytalk

alias testident='telnet 130.236.254.1 114'
bm() { perl -pe "s/x0d/x0a/g; s/[\x0-\x08\x0b-\x1f\x7f-\xff]+/./g" $* | m }
bmo() { perl -pe "s/x0d/x0a/g; s/[\x0-\x08\x0b-\x1f\x7f-\xff]+/./g" `locate $* ` | m }
pstek() { pstopbm $1 | pbmtek }
pstekd() { pstopbm $1 | pbmtek -d }
pictekd() { gunzip -c $1 | psfix | pstekd - | rawtty }

podman() { pod2man $* | nroff -i /usr/lib/tmac/tmac.an | m }
udiff()  { diff -urd $* | egrep -v "^Only in |^Binary files " }
cdiff()  { diff -crd $* | egrep -v "^Only in |^Binary files " }

alias glwi='glimpse -y -w -i'
alias glh='glimpse -y -w -i'
alias glc='glimpse -y -w -i -H /var/contrib'

dux() {
  if [[ -n "$1" ]]; then
    cd $1
  fi
  du . | xdu -n &!
}

w3logm () {
  grep tjchol01 /var/www/server/logs/access_log | egrep -v 'mecca\.|\.atext\.com|\.archive\.org|\.inktomi\.com|\.altavista-software\.com|\.pa-x\.dec\.com|\.alexa\.com' | $PAGER
}

w3log () {
  grep /tom /var/www/logs/access_log | egrep -v 'mecca\.|\.atext\.com|\.archive\.org|\.inktomi\.com|\.altavista-software\.com|\.pa-x\.dec\.com|\.alexa\.com' | $PAGER
}

w3logr () {
  grep tjchol01 /var/www/logs/referer_log | egrep -v '^http://mecca[/.]|^file://localhost' | $PAGER
}
alias tjcbackup='copy /users/tjchol01 ubongo:/usr1/backup'

alias kingfm='raplayer pnm://204.236.16.2/kingfm28MI.ra'
alias stowd='stow -d /usr/contrib/stow'

alias plalt="xmodmap -e 'remove mod1 = Alt_R' -e 'keysym Alt_R = Mode_switch Alt_R' -e 'add mod3 = Alt_R'"


prof-time () {
  $1 +RTS -pT -hC -RTS ${2-}
}
#
# completions
#
compctl -g '*(-/D)' cd pushd
compctl -g '*(/)' rmdir dircmp
compctl -j -P % -x 's[-] p[1]' -k signals -- kill
compctl -j -P % fg bg wait jobs disown
compctl -A shift
compctl -caF type whence which where
compctl -c {man,lw,mw}
compctl -F unfunction
compctl -a unalias
compctl -v unset typeset declare vared readonly export integer
compctl -e disable
compctl -d enable

compctl -g '*.(lhs|hs)' + -g '*(-/)' runhugs hugs ghc

compctl -g '*.(tex(|m)|dtx|ins)' + -g '*(-/)' tex tex-ps latex pdflatex
compctl -g '*.dvi' + -g '*(-/)' dvilj dvilj2p dvicopy xdvi xdvia dvips dvit dvgt dv dp dps dps208 dpa dpv dpj
compctl -g '*.mp' mp mpost
compctl -g '*.lj' lpm
compctl -g '*.(((e|)ps(|0)|[0-9]|[0-9][0-9])|pdf)' + -g '*(-/)' psselect gv ghostview wssp225 vogt203 lp up2 fload floader pstek pstekd pstopbm pstotext ps2pdf
compctl -g '*.pdf' acroread
compctl -g '*.pbm' pbmtek
compctl -g '*.ps(|[012]).gz' zgv zlps zlpv zlpn zlpj zlpa

compctl -g '*.java' javac
#compctl -g '*.class' java


compctl -g '*.w' ctangle cweave
compctl -g '*.y' bison yacc
compctl -g '*.l' lex flex
compctl -x 'n[-1,:]' -f - 'p[1]' -k hosts -S ':' - ''  -- mount
compctl -x 'p[1]' -k hosts -- remsh ping telnet traceroute
compctl -x 'n[-1,@]' -k '($hosts)' - 'p[1]' -k '($CI_GROUP)' -- finger talk ytalk etalk las last write mail
compctl -f -x 'n[-1,:]' -f - 'p[2]' -k hosts -S ':' -- rcp
compctl -k hosts -x 's[[+-]]' -k hosts -- xhost
compctl -g '*.(gz|Z|z|zip)' + -g '*(-/)' zcat gzcat zmore
compctl -g '*.arj' unarj
compctl -g '*.zip' unzip
compctl -g '^*.(gz|Z|z|zip|taz|tgz)' gzip
compctl -g '*.(gz|Z|z|zip|taz|tgz)' gunzip zfile ztouch
compctl -g '^*.(bz2|tbz)' bzip2
compctl -g '*.(bz2|tbz)' bunzip2
compctl -g '*.Z' -x 's[-]' -k '(f t v 9 P K)' -- znew
compctl -x 'p[1]' -g '*.(tar.(gz|Z)|tgz)' + -g '*(-/)' -- gtarc gtart gtarx
compctl -x 'p[1]' -g '*.(tar.bz2|tbz)' + -g '*(-/)' -- btarc btart btarx
compctl -f -x 's[-]' -k '(f R)' - 'S[.]' -f - 'n[-1,.]'  - 'c[-1,-]' -u -S '.' - 'p[1]' -u -S '.' -- chown
compctl -f -x 's[-]' -k '(f R)' - 'c[-1,-]'  - 'p[1]'  -- chgrp

#
# .zshenv.personal
#
if [[ -r ~/.zshenv.personal ]]; then
  . ~/.zshenv.personal
fi

#
# .login
#
if [[ -o login && -n "$TERM" ]]; then # shell options: we are a login shell
    case "$HOST" in
      mecca | aivo | agy | ubongo | mozg) # get tgt if on mecca
          if [[ $USERNAME != "root" ]]; then
#            if ! kinit -R ; then
#              kinit -f -l 2d -r 100d
#            fi
            case "$DISPLAY" in
              :0*)
#                xauth extract - $HOST$DISPLAY | talos /usr/X11R6/bin/xauth merge -
                ;;
              *:0*)
 #               xauth extract - $DISPLAY | talos /usr/X11R6/bin/xauth merge -
                  #   xset fp+ /ets/Mathematica-Fonts/X
                  ;;
              "")
                ;;
            esac
          else # we usually do 'su' after login as tjchol01
            :
          fi
          ;;
      *)
        echo ".zshenv: login: what host is $HOST/$OSTYPE?"
        ;;
    esac

    if [[ -o interactive ]]; then
      mesg y
    fi
    case "$TERM" in
      vt100|vt220|vt320)
        if [[ "$TERM" == "vt100" || "$TERM" == "vt220" || "$TERM" == "network" ]]; then
          export TERM=vt320-25
        fi
	case "$REMOTEHOST" in
	  *.modems.louisville.edu)
	    export TERM=conex
	    stty rows 30
	    resize > /dev/null
	    export LINES=30
	    stty rows 30
	    ;;
	esac
        tty > ~/.raw_tty
        #      eval `resize`
        tput smkx                                 # set cursor keys to \EOx
#	resize
        screen -R
        ;;
      *)
        TERM=$TERM
    esac
fi

# $Log: .zshenv,v $