export PERL_MM_OPT="PREFIX=$HOME"
export WWW_HOME="file:///home/short/.bookmarks.html"
export GREP_OPTIONS="--binary-files=without-match --directories=skip"
+[ -n "$PS1" ] && export PS1="`echo -en '\017'`$PS1" # set only in interactive sessions
+export MINICOM="-m -c on" # metakeys+color
+export HISTSIZE=100000
+export HISTFILESIZE="$HISTSIZE"
+export CVS_RSH="ssh"
-# even when LANG is set to "en_US" it is lethal - strcoll() starts to sort case-insensitively!
-unset LANG
+# Force strcoll() to sort case-sensitively! (empty/undef doesn't work)
+export LC_COLLATE=C
function cvsdiff { cvs diff "$@" 2>&1|pipebuf -q| less; }; export -f cvsdiff
function cvsdiffi { cvs diff "$@" 2>&1|pipebuf -q|grep -v '^?'|less; }; export -f cvsdiffi
function wclines { awk '{x[$0]++}END{for (i in x) print x[i]"\t"i}'; }; export -f wclines
function ulimitme { ulimit -m 100000 -d 150000 -v 200000; }; export -f ulimitme
function grep { ( ulimitme; `which grep` "$@"; ); }; export -f grep
-function finame { find . `
- awk </dev/null 'BEGIN{ for (i=1;i<ARGC;i++) print " -iname *"ARGV[i]"*"; }' "$@";
+function finame { find . -false `
+ awk </dev/null 'BEGIN{ for (i=1;i<ARGC;i++) print " -o -iname *"ARGV[i]"*"; }' "$@";
`; }; export -f finame
function rsync { `which rsync` -v -e ssh --progress --stats --partial --block-size=512 "$@"; }; export -f rsync
function tohex { od -An -txC /tmp/out|tr -d '\n '|tr 'a-f' 'A-F';echo; }; export -f tohex