X-Git-Url: https://git.llucax.com/z.facultad/75.08/llamadas.git/blobdiff_plain/f919a7a2094587317b97313c690b27143b40c3b7..bfe87f09077134e3d4883eb2755847509b0aa2a1:/afinstal?ds=inline

diff --git a/afinstal b/afinstal
index cac5efb..10b8dca 100755
--- a/afinstal
+++ b/afinstal
@@ -63,8 +63,13 @@ MARCA
 }
 
 # Modifica una linea dada de un archivo dado
+# Uso: nombre_archivo nro_linea nueva_linea
 function changeLine() {
-	cat "$1" | sed "${2}s%.*%$3%" > "$1"
+	# Si no se puede crear archivos, muero
+	[ -w . ] || die "No se puede escribir en el directorio actual" 100
+	tmp="$0.$$.tmp"
+	sed "${2}s%.*%$3%" > "$tmp" < "$1"
+	mv "$tmp" "$1"
 }
 
 # Mensaje generico de abort
@@ -134,7 +139,7 @@ MARCA
 				echo
 				echo "Se instalará [$selected]"
 
-				preguntar "¿Desea agregar otro componente para instalar?" "SsNn" key
+				preguntar "¿Desea agregar otro componente para instalar (S)?" SsNn key S
 				if [ "$key" = "s" ]; then
 					key="S"
 				fi