alias l='ls -lbF'
alias maple="ssh -t vega.fjfi.cvut.cz maple"
#alias cc='cc -I/home/short/include'
-alias vi='vim'
+if which vim &>/dev/null;then
+ alias vi='vim'
+else
+ echo >&2 'WARNING: No vim(1).'
+fi
alias grepb='grep --binary-files=binary'
alias L='lynx'
alias chown='chown --no-dereference'
alias cvsignoresrm='cvsutil --ignores --rm'
alias cvsignoresrmall='cvsutil --ignores --workings --rm'
alias cvsignoresallrm='cvsutil --ignores --workings --rm'
+alias svnignoresall='svn status |sed -n "s/^[?] //p"'
+alias svnignoresallrm='svn status |sed -n "s/^[?] //p"|tr "\n" "\0"|xargs -0 rm -rf'
[ "`uname`" = "SunOS" -a -x $HOME/bin/rpm-by-pkg ] && alias rpm='rpm-by-pkg'
alias disass='objdump -D --target=binary --architecture=i386'
alias cal='cal -m'
-o -name "*.java" \
-o -name "*.p[lm]" \
-o -name "*.py" \
+ -o -name "*.exp" \
')' \
- |ctags --file-tags -L - "$@"
+ |ctags --file-tags -L - --langmap=Tcl:+.exp "$@"
fi; );}; export -f ctags
function ctagsh { ctags "--c-types=+px"; }; export -f ctagsh
function cpan {(unset cpan; if [ $# = 0 ];then cpan;else perl -MCPAN -e "install qw($*);";fi; );}; export -f cpan