Fixed missing $PERLLIB includes in "make test" run from CPAN

[nethome.git] / .bashrc

diff --git a/.bashrc b/.bashrc
index cf1d026..12b2b86 100644 (file)
--- a/.bashrc
+++ b/.bashrc
@@ -23,7 +23,7 @@ _bash_profile_addpath MANPATH         "$HOME/man"
 _bash_profile_addpath CVSROOT         "$HOME/cvs" single
 _bash_profile_addpath CVSROOT         "$HOME/pserver/cvs" single
 
-for _perldir in $(eval "echo $HOME/lib/perl5/site_perl$(
+for _perldir in $(eval "echo $HOME/lib/perl5{,/site_perl}$(
        for perlvar in version archname;do
                echo -n '{,/'
                perl -V:"$perlvar"|cut -d "'" -f 2|tr -d '\n'
@@ -59,7 +59,7 @@ export IGNOREEOF=10
 export TMOUT=900
 export EDITOR='vim'
 export LC_CTYPE=cs_CZ.ISO-8859-2
-export PERL_MM_OPT="PREFIX=$HOME"
+export PERL_MM_OPT="PERL=$HOME/bin/perlilib 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
@@ -78,11 +78,13 @@ function cvsupdatei { cvs update "$@" 2>&1|pipebuf -q|grep -v '^?'|less; }; expo
 
 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 grep {(unset grep; ( ulimitme; grep "$@"; ); );}; export -f grep
 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 mkcd { mkdir -p "$1"; cd "$1"; }; export -f mkcd
+function pushdmk { mkdir -p "$1"; pushd "$1"; }; export -f pushdmk
+function rsync {(unset rsync; 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
 function edall {
        find -type f|while read -r i;do
@@ -92,10 +94,10 @@ function edall {
 function mi { (
        set -ex;cd "$1";while true;do test "$PWD" != "/";if [ -e configure.in -o -e Makefile.PL ];then break;fi;cd ..;done;make install;
        ); };export -f mi
-function ctags {
-       if [ $# != 0 ];then `which ctags` "$@";else
-               rm -f tags;find -type f -a '(' -name "*.[chC]" -o -name "*.cc" -o -name "*.java" ')'|xargs `which ctags` -a --file-tags
-       fi; }; export -f ctags
+function ctags {(unset ctags;
+       if [ $# != 0 ];then ctags "$@";else
+               find -type f -a '(' -name "*.[chC]" -o -name "*.cc" -o -name "*.java" ')'|ctags --file-tags -L -
+       fi; );}; export -f ctags
 
 ulimit -c 0
 set +H