# -*- coding: raw-text-unix; mode: sh -*-
# Updated to work together with edrx1: (find-fline "edrx1")
# Edrx, 2005oct03.
# (eev "cd; ln -s .zshrc.local.cdd .zshrc.local")
# CONTENTSI386S=$S/http/ftp.us.debian.org/debian/dists/sarge/Contents-i386

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

# (find-node "(libc)Locale Categories")
#export LC_ALL=en_US
#export LANG=en_US
export LC_ALL=C
export LANG=C

if [[ "$TERM" == "linux" ]] ; then softbell; fi

export PATH=$EDRXPATH:/sbin:/usr/sbin:

export LD_LIBRARY_PATH=~/ulocal/lib:
export MANPATH=$HOME/ulocal/share/man:

if [[ $LOGNAME == e || $LOGNAME == a ]]; then
  export LOGNAME=edrx
  export MAIL=/var/mail/edrx
  export USER=edrx
fi

# (find-angg ".zshrc")
# (find-angg ".zshrc" "prep-home-cdd")
# (find-angg ".zshrc" "prep-apti")
# FILES1=(.zshrc.local)

# (find-eevtmpfile "psne.sh")
# Create psne-sh-maybe (experimental).
# Shit! Function names with "-" may be invalid in (ba)sh -
# psne-sh uses them.
function psne-sh-maybe-download-here () {
  if [ -e $(basename $1) ]; then
    echo "Already here: $1"
  else
    echo $1 >> ~/.psne.log
    wget $1
  fi
}
function psne-sh-maybe () {
  if psne-sh-urlp $1; then
    eval "$(psne-sh-meta0 $1)"
    psne-sh-maybe-download-here $1
  else
    echo "Not an url: $1"
  fi
}

function prep-help () {
  prep-all
}

# «installeddebss»
# (find-fline "~/tmp/" " oinstdebs.")
# (find-zsh "comm ~/tmp/oinstdebs.2006-06-20 =(installeddebss)")
export OINSTDEBS=$HOME/tmp/oinstdebs.$(date +%Y-%m-%d)
function installeddebss   () { installeddebs | sort }
function installeddebsss_ () { installeddebss > $OINSTDEBS }
function installeddebsss  () {
  if [ ! -e $OINSTDEBS ]; then
    echo "Writing: $OINSTDEBS"
    installeddebsss_
  else
    echo "Not overwriting: $OINSTDEBS"
  fi
}

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