+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"
+
+# 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 cvsupdate { cvs update "$@" 2>&1|pipebuf -q| less; }; export -f cvsupdate
+function cvsupdatei { cvs update "$@" 2>&1|pipebuf -q|grep -v '^?'|less; }; export -f cvsupdatei
+function cvsfiles {
+ for i in `find . -name Entries|grep '/CVS/Entries$'`;do
+ j="`echo "$i"|sed 's,CVS/Entries$,,'`"
+ sed -n 's,^/\([^/]*\)/[^-].*$,'"$j"'\1,p' <$i
+ done \
+ | sed 's%^\./%%'
+ }; export -f cvsfiles
+function cvsignore {
+ for i in `find . -name .cvsignore`;do
+ j="`echo "$i"|sed 's,\.cvsignore$,,'`"
+ sed -n 's,^.*$,'"$j"'&,p' <$i
+ done
+ }; export -f cvsignore
+function cvsignorerm { cvsignore | xargs rm -f; }; export -f cvsignorerm
+function cvsignoreall {
+ (find -type f|sed -e '\#/CVS/[^/]*$#d' -e 's#^\./##';cvsfiles)|sort|uniq -c|sed -n "s/^ *1`echo -e '\t'`//p"
+ }; export -f cvsignoreall
+function cvsignoreallrm { cvsignoreall | xargs rm -f; }; export -f cvsignoreallrm