Reemplazo de espacios por tabulaciones

functions_korn/admin_prompt

@@ -1,9 +1,8 @@
 # Añadir esta configuración en /root/.profile para personalizar el prompt para root
 
-function admin_prompt
+function admin_prompt {
-{
+	[[ $PWD == $HOME ]] && dir="~" || dir="${PWD#*/}"
-  [[ $PWD == $HOME ]] && dir="~" || dir="${PWD#*/}"
+	print "${YELLOW}[$dir] ${GREEN}#${RED} "
-  print "${YELLOW}[$dir] ${GREEN}#${RED} "
 }
 
 PS1="\$(admin_prompt) "

functions_korn/count

@@ -1,11 +1,12 @@
 # Contar archivos o directorios en el directorio
 # Esto funciona pasando la salida del glob a la función y luego contando el número de argumentos.
 
-function count
+function count {
-{
+	if [[ $# -eq 0 ]]; then
-  # Uso:
+		print "count /path/to/dir/*    -> Total (archivos y directorios)" >&2
-  #  count /path/to/dir/*    -> Total (archivos y directorios)
+		print "count /path/to/dir/*/   -> Total de directorios" >&2
-  #  count /path/to/dir/*/   -> Total de directorios
+		return 1
-
+	elif
- [[ -e $1 ]] && print "$#" || print 0
+		[[ -e $1 ]] && print "$#" || print 0
+	fi
 }

functions_korn/countl

@@ -2,12 +2,11 @@
 
 function countl
 {
-  lines=0
+	lines=0
 
-  while IFS= read -r line || [[ -n $line ]]; do
+	while IFS= read -r line || [[ -n $line ]]; do
-    # lines=$((lines+1)) is slower than ((lines=lines+1))
+		((lines=lines+1))
-    ((lines=lines+1))
+	done < "$1"
-    done < "$1"
 
-  printf '%s\n' "$lines"
+	printf '%s\n' "$lines"
 }

functions_korn/get_branch

@@ -1,11 +1,10 @@
 # Mostrar rama actual en directorios de git
 
-function get_branch
+function get_branch {
-{
+	BRANCH=$(git rev-parse --abbrev-ref HEAD 2> /dev/null)
-  BRANCH=$(git rev-parse --abbrev-ref HEAD 2> /dev/null)
+	if [[ ! -z ${BRANCH} ]]; then
-  if [[ ! -z ${BRANCH} ]]; then
+		print "${BRANCH}"
-    print "${BRANCH}"
+	fi
-  fi
 
-  unset BRANCH
+	unset BRANCH
 }

functions_korn/get_dir

@@ -1,6 +1,5 @@
 # Mostrar directorio de trabajo actual
 
-function get_dir
+function get_dir {
-{
+	printf '%s\n' ${PWD/$HOME/\~}
-  printf '%s\n' ${PWD/$HOME/\~}
 }

functions_korn/man

@@ -1,13 +1,12 @@
 # Mostrar los manuales de los programa con color
 
-function man
+function man {
-{
+	LESS_TERMCAP_mb=$(printf %b "\033[1;31m") \
-  LESS_TERMCAP_mb=$(printf %b "\033[1;31m") \
+	LESS_TERMCAP_md=$(printf %b "\033[1;31m") \
-  LESS_TERMCAP_md=$(printf %b "\033[1;31m") \
+	LESS_TERMCAP_me=$(printf %b "\033[0m") \
-  LESS_TERMCAP_me=$(printf %b "\033[0m") \
+	LESS_TERMCAP_se=$(printf %b "\033[0m") \
-  LESS_TERMCAP_se=$(printf %b "\033[0m") \
+	LESS_TERMCAP_so=$(printf %b "\033[1;44;33m") \
-  LESS_TERMCAP_so=$(printf %b "\033[1;44;33m") \
+	LESS_TERMCAP_ue=$(printf %b "\033[0m") \
-  LESS_TERMCAP_ue=$(printf %b "\033[0m") \
+	LESS_TERMCAP_us=$(printf %b "\033[1;32m") \
-  LESS_TERMCAP_us=$(printf %b "\033[1;32m") \
+	command man -a "$@"
-  command man -a "$@"
 }

functions_korn/mkcd

@@ -1,7 +1,6 @@
 # Crear un directorio y cambiar a él
 
-function mkcd
+function mkcd {
-{
+	mkdir -p -- "$1" || return
-  mkdir -p -- "$1" || return
+	cd -P -- "$1"
-  cd -P -- "$1"
 }

functions_korn/prompt

@@ -1,9 +1,8 @@
 # Prompt para usuario normal
 
-function prompt
+function prompt {
-{
+	print "${GREEN}${PWD/$HOME/\~} ${CYAN}$(get_branch)"
-  print "${GREEN}${PWD/$HOME/\~} ${CYAN}$(get_branch)"
+	print "${RED}-> ${YELLOW}$ ${NORM}"
-  print "${RED}-> ${YELLOW}$ ${NORM}"
 }
 
 PS1="\$(prompt) "

functions_korn/rman

@@ -1,11 +1,11 @@
 # Consultar manuales de programa remotos
 
 rman() {
-  if command -v lynx >/dev/null; then
+	if command -v lynx >/dev/null; then
-    lynx https://man.voidlinux.org/x86_64/"$@"
+		lynx https://man.voidlinux.org/x86_64/"$@"
-    return 0
+		return 0
-  else
+	else
-    print "Instale el programa lynx"
+		print "Instale el programa lynx"
-    return 1
+		return 1
-  fi
+	fi
 }

functions_korn/ver

@@ -1,5 +1,5 @@
 # Consultar qué versión de shell korn se tiene en el sistema
 
 ver() {
-  printf '%s\n' "Korn Shell: ${KSH_VERSION:-desconocida}"
+	printf '%s\n' "Korn Shell: ${KSH_VERSION:-desconocida}"
 }

functions_korn/which_sudo

@@ -1,13 +1,14 @@
 # Función que se encarga de determinar qué programa usar para escalar
 # permisos de administrador
 
-function which_sudo
+function which_sudo {
-{
+	if [[ $(id -u) == 0 ]]; then
-  if command -v sudo >/dev/null && sudo -l | grep -q -e ' ALL$' -e xbps-install; then
+		return
-    print sudo
+	elif command -v sudo >/dev/null && id | grep -q wheel; then
-  elif command -v doas >/dev/null && [ -f /etc/doas.conf ]; then
+		print sudo
-    print doas
+	elif command -v doas >/dev/null && [ -f /etc/doas.conf ]; then
-  elif [[ $(id -u) != 0 ]]; then
+		print doas
-    print su
+	else
-  fi
+		print su
+	fi
 }