#!/bin/bash 
# 
# Algunos aliases utiles 
# (no son especficos para usuarios hispanoparlantes)
# Si vd. tiene alguna sugerencia envela al desarrollador
# del paquete user-es, mediante la orden:
# 	bug -S wishlist user-es
# 
# Javier Fernndez-Sanguino Pea <jfs@debian.org>
# #####################################################
alias texclean='rm -f *.toc *.aux *.log *.cp *.fn *.tp *.vr *.pg *.ky'
alias clean='echo -n "Desea borrar todos los ficheros temporales?";
	read si;
	if test "$si" = "y" -o "$si" = "s" ; then
	   rm -f \#* *~ .*~ *.bak .*.bak  *.tmp .*.tmp core a.out;
	   echo "Hecho.";
	else
	   echo "Cancelado.";
	fi'
alias h='history'
alias j="jobs -l"
alias ll="ls -l"
#alias ls="ls -F"
alias l.='ls .[a-zA-Z0-9]*'
alias pu="pushd"
alias po="popd"

# aliases para los ms novatos (que conozcan DOS)
# aliases for the more novice (and DOS aware) people
alias cp='cp -i'
alias mv='mv -i'
alias rm='rm -i'
alias cls='clear'
alias md='mkdir'
alias rd='rmdir'
#alias dir='ls -al' 
# no necesario, hay un ejecutable /bin/dir
# not necessary, because there is an executable /bin/dir
alias copy='cp -i'
alias del='rm -i'

alias l='ls -lF'

# if [ -x /usr/bin/less ]; then
# 	alias l='less'
# else
# 	alias l='more'
# fi
if [ ! -z $DISPLAY ]; then
	if [ -x /usr/X11R6/xless ]; then
		alias m='xless'
	fi
fi

alias psl='ps -aux | less'
alias ..='cd ..'
# Dado que '.' es 'source' esto est desactivado por defecto
#alias .='echo $PWD'



#
# Csh compatability:
#
alias unsetenv=unset
function setenv () {
  export $1="$2"
}

# Funcin que aade los aliases a la shell actual y al fichero
# ~/.bash_aliases.
#-------------------------------------------------------------
# Function which adds an alias to the current shell and to
# the ~/.bash_aliases file.
add_alias ()
{
   local name=$1 value="$2"
   echo alias $name=\'$value\' >>~/.bash_aliases
   eval alias $name=\'$value\'
   alias $name
}

# Orden "repetir". Como:
#
#	repite 10 echo foo
#------------------------
# "repeat" command.  Like:
#
#	repeat 10 echo foo
repite ()
{ 
    local count="$1" i;
    shift;
    for i in $(seq 1 "$count");
    do
        eval "$@";
    done
}

# Subfuncin necesaria por `repite' 
#-----------------------------------
# Subfunction needed by `repeat'.
seq ()
{ 
    local lower upper output;
    lower=$1 upper=$2;

    if [ $lower -ge $upper ]; then return; fi
    while [ $lower -le $upper ];
    do
	echo -n "$lower "
        lower=$(($lower + 1))
    done
    echo "$lower"
}

# Por si acaso tenemos la consola fastidiada
tty -s
if [ $? = 0 ]; then
        stty cs8 -istrip -parenb >&0;
fi
# Para listado con colores
if [ -e /usr/bin/dircolors ]; then
	eval `/usr/bin/dircolors`
fi
alias ls='ls --color=auto'

# Para que a los VT100 no se les fastidie el terminal con los colores
if [ $TERM = vt100 ]; then
        alias ls='ls -F --color=never';
fi


# Funcion de calculadora :)
# cortesia de Joey Hess <joey@kitenet.net> en debian-debel 5 Aug 1998
calcula () {
        echo $* | bc -l
}

# Aliases relacionados con la internacionalizacin:
# #################################################

# Alias para los usuarios de sgml
alias sgml2html='sgml2html -c latin -l es'
alias sgml2txt='sgml2txt -c latin -l es'
alias sgml2rtf='sgml2rtf -c latin -l es'

# Para los editores
alias joe='joe -asis'

