Muestro como utilizar las funciones bonitas para mejorar el AFINSTALL

[z.facultad/75.08/llamadas.git] / AFINSTAL

diff --git a/AFINSTAL b/AFINSTAL
index 87ec7a2f0624c94ec3ace8301e360576d44583e3..2883a2711914eaf64925ceaf2e82c63f1a37ae6d 100755 (executable)
--- a/AFINSTAL
+++ b/AFINSTAL
@@ -14,6 +14,9 @@
 #echo "term "$TERM
 #echo "time out" $TMOUT
 
+#Includes
+. util.sh
+
 # chequeo sistema operativo
 echo "Chequeando SO ..."
 if [ -z  "`echo $0 | sed \"s/.*AFINSTAL$//\"`" ]; then
@@ -38,26 +41,25 @@ else
        echo "Proceso de instalación para $SISOPTP"
        echo "Presione ENTER para continuar"    
 fi
-opcion="a"
-while [ -n "$opcion" ]; do
-       echo "*******************************************************"
-       echo "*                                                     *"
-       echo "*     Proceso de instalación de \"Antifraude\"          *"
-       echo "*      Copyright TPSistemasOp  (c)2004                *"
-       echo "*                                                     *"
-       echo "*******************************************************"
-       echo "A T E N C I O N: Al instalar Antifraude UD. expresa estar"
-       echo "en un todo de acuerdo con los términos y condiciones del"
-       echo "\"ACUERDO DE LICENCIA DE SOFTWARE\" incluido en este paquete"
-       echo ""
-       echo "Si desea cancelar este proceso oprima 'F' y luego ENTER"
-       echo "Para continuar oprima solamente ENTER"
-       read opcion
-       if [ "$opcion" == "F" ] || [ "$opcion" == "f" ]; then 
-               echo "Proceso de instalación cancelado"
-               exit 0
-       fi      
-done   
+
+echo "*******************************************************"
+echo "*                                                     *"
+echo "*     Proceso de instalación de \"Antifraude\"        *"
+echo "*      Copyright TPSistemasOp  (c)2004                *"
+echo "*                                                     *"
+echo "*******************************************************"
+echo "A T E N C I O N: Al instalar Antifraude UD. expresa estar"
+echo "en un todo de acuerdo con los términos y condiciones del"
+echo "\"ACUERDO DE LICENCIA DE SOFTWARE\" incluido en este paquete"
+echo ""
+echo "Si desea cancelar este proceso oprima 'F' y luego ENTER"
+echo "Para continuar oprima 'C' y luego ENTER"
+
+preguntar "Su opción" "cCfF" opcion
+if [ "$opcion" == "F" ] || [ "$opcion" == "f" ]; then 
+       echo "Proceso de instalación cancelado"
+       exit 0
+fi     
 
 #Verifico que Perl este instalado
 if [ "esta" == "`type perl | sed s/\"perl is .*\"/\"esta\"/`" ]; then 
@@ -86,11 +88,11 @@ while [ "$again" == "s" ]; do
        op="s"
        while [ "$op" == "s" ]; do
                #muestro el directorio donde se instalara el sistema
-               echo "Nombre del directorio de instalación ($INSTDIR),ingrese una nueva ruta o ENTER para continuar: $PATH_GENERAL/<nueva ruta>"
-               read AUX1
-               if [ ! -z $AUX1 ]; then 
-                       INSTDIR="$PATH_GENERAL/$AUX1"
-               fi      
+               #
+               # Asi queda mas corto ;-)
+               #
+               leer "Nombre del directorio de instalación" "$INSTDIR" INSTDIR
+
                echo "Nombre del directorio de configuración ($CONFDIR), ingrese una nueva ruta o ENTER para continuar: $PATH_GENERAL/<nueva ruta>"
                read AUX2
                if [ ! -z $AUX2 ]; then