home *** CD-ROM | disk | FTP | other *** search
/ Amiga ISO Collection / AmigaUtilCD2.iso / PGP / PGMUI104.LHA / PGPgoesMUI104 / Install_PGPgoesMUI < prev    next >
Encoding:
Text File  |  1997-01-31  |  1.1 KB  |  79 lines
  1. ;
  2. ; Installation script for PGPgoesMUI
  3.  
  4. (set lng @language)
  5.  
  6.  
  7. (if (= lng "deutsch")
  8.  
  9. (
  10.  
  11.     (set #msj1 "Instaliiere PGPgoesMUI...")
  12.  
  13.     (set #msj2 "Wo soll 'PGPgoesMUI' installiert werden ?")
  14.  
  15.     (set #msj3 "Welche Sprachkataloge soll ich installieren ?")
  16.  
  17. )
  18.  
  19. (
  20.       (
  21.  
  22.     (set #msj1 "Installing PGPgoesMUI...")
  23.  
  24.     (set #msj2 "Where shall I install PGPgoesMUI ?")
  25.  
  26.     (set #msj3 "Which languages do You wish to install ?")
  27.  
  28.          )
  29.  
  30. ))
  31.  
  32. ; -------------------------------------------------------------
  33. ; Start 
  34.  
  35.  
  36. (transcript #msj1)
  37.  
  38.  
  39. (set name
  40.         (askdir
  41.         (prompt #msj2)
  42.         (help @askdir-help)
  43.         (default "SYS:")
  44.         )
  45. )
  46.  
  47. (copyfiles
  48.     (source "PGPgoesMUI")
  49.     (infos)
  50.     (dest name)
  51. )
  52.  
  53. (set lang
  54. (askoptions
  55.     (prompt #msj3)
  56.     (help @askoptions-help)
  57.     (choices "deutsch" "español" )
  58.     (default def-lang)
  59. ))
  60.  
  61. (set n 0)
  62.  
  63. (while (set language (select n "deutsch" "español" "" ) )
  64. (
  65.     (if (IN lang n)
  66.         (copyfiles
  67.             (source (cat "locale/" language ".catalog" ))
  68.             (dest (cat "LOCALE:catalogs/" language ))
  69.             (newname "pgpgoesmui.catalog")
  70.         )
  71.     )
  72.     (set n (+ n 1))
  73. ))
  74.  
  75.  
  76. (set @default-dest name)
  77.  
  78. (exit)
  79.