# (find-angg ".zshrc.local.puc")

export S=$HOME/snarf
export USRC=$HOME/usrc
export usr_src=$HOME/usrc

# For Lua:
[[ "$ORIGLIBPATH" == "" ]] && export ORIGLIBPATH=$LD_LIBRARY_PATH
export LD_LIBRARY_PATH=$ORIGLIBPATH:$HOME/lib

# (find-angg "LATEX/Makefile" "DPI")
export DPI=600

# (find-man "lynx" "WWW_HOME")
export WWW_HOME=$HOME/TH/L/index.html

# «setbell»
# (find-es "console" "setbell")
function setbell () {
  echo -ne "\033[10;$1]\033[11;$2]"
}
function softbell () { setbell 80 22 }
function defaultbell () { setbell 750 125 }
tty -s && softbell
# sleep 1; echo -e '\a'


# «prompt»
# (find-angg ".zshrc" "prompt")
# (find-es "zsh" "prompt")
# (find-es "anatocc" "edrxroot")
export machine=$(uname -n)
if [[ $machine = angg ]]; then
  PS1="%d($(whoami)$_CHROOTSTR)# "
else
  PS1="%d($(whoami):$machine[1,2]$_CHROOTSTR)# "
fi
PS2='> '

# (find-angg ".zshrc" "console")
alias quickkeys='kbdrate -r 30.0 -d 250'

# I created this "pmail" function because the mails that I was sending
# with "mail -s subj to <<'---'^Jbody^J---" were going with a bad
# "from" address... but this doesn't work either.
#
# (find-man "pine")
# (find-fline "~/.pinerc")

function pmail () {
  if [[ "_$1" == "_-s" ]]; then
    echo -n > ~/.pine-nullmbox
    echo -n $2 > ~/tmp/msg.subj
    echo -n $3 > ~/tmp/msg.to
    cat > ~/tmp/msg.body
    eeg4 -c '
      loadeeglibs k
      proc readtmp {fname} { readfile [getenv HOME]/tmp/$fname }
      k C " [readtmp msg.to]" ret ret ret " [readtmp msg.subj]" ret
      k C-r " ~/tmp/msg.body" ret
      k C-x y
      k q y
      # (find-angg "eev/eeg4" "dospawn")
      spawn pine -f [getenv HOME]/.pine-nullmbox
      stty raw
      while {[dointeraction]} {}
      exit
    ' < /dev/tty
  else
    echo "pmail: args should be -s <subj> <to>, stdin should be body of msg"
  fi
}

function deeg0 () {
  eeg -c '
    source $env(HOME)/.passwds.tcl
    l $passwd(panda)
    l {HOME=/root/edrx _CHROOTSTR=:b1 SHELL=/bin/zsh exec chroot /hdb1 /usr/bin/zsh}
  ' $* su -
}
function deeg () { deeg0 -f /dev/null }

# For woody
export LANGUAGE=C
export LC_ALL=C