ctags: +.exp

[nethome.git] / .bashrc

diff --git a/.bashrc b/.bashrc
index c8c6a35..d8b75a1 100644 (file)
--- a/.bashrc
+++ b/.bashrc
@@ -126,7 +126,11 @@ alias ls='ls -bF'
 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'
@@ -241,8 +245,9 @@ function ctags {(unset ctags;
                                                -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