X-Git-Url: https://git.llucax.com/z.facultad/75.08/llamadas.git/blobdiff_plain/a1c6bbce565dc7d598f91c957d883b0cf924bf7c..8924bf6b7d40b1b543706926d806e4104db61393:/inst/util.sh?ds=inline

diff --git a/inst/util.sh b/inst/util.sh
index 83f077d..2465e98 100755
--- a/inst/util.sh
+++ b/inst/util.sh
@@ -133,6 +133,20 @@ perr()
 	echo $@ >&2
 }
 
+
+# Pone un MSG en el log
+# Parametros :
+#  $1 = Archivo del log
+#  $2 = Comando
+#  $3 = Mensaje
+#  $4 = Tamaño maximo
+put_log() {
+	fecha=$(date +%d/%m/%Y-%H:%M)
+	echo "$fecha $USER $2:\"$3\"" >> $1
+
+	clean_log "$1" "$4"
+}
+
 # Trunca un archivo de log si pasa el tamaño máximo.
 # Uso: clean_log log_filename max_log_size_bytes
 clean_log()