home *** CD-ROM | disk | FTP | other *** search
/ OS/2 Shareware BBS: 5 Edit / 05-Edit.zip / os2tex_1.zip / disk1.zip / disk_1 / psutils.cmd < prev    next >
OS/2 REXX Batch file  |  1997-12-29  |  754b  |  57 lines
  1. /**/
  2.  
  3.  
  4. call RxFuncAdd 'SysLoadFuncs', 'RexxUtil', 'SysLoadFuncs'
  5. call SysLoadFuncs
  6.  
  7.  
  8. parse arg language texmf source options
  9.  
  10.  
  11. say "msg:DVIPS:"
  12.  
  13.  
  14.  
  15. if language = '049' then do
  16.  
  17.   msg.1 = 'msg:PSUTILS: Installiere Dateien'
  18.  
  19.   errcd  = 'err:Verzeichniswechsel nicht möglich'
  20.  
  21. end
  22. else do
  23.  
  24.   msg.1 = 'msg:PSUTILS: Installing files'
  25.  
  26.   errcd  = 'err:Unable to change directory'
  27. end
  28.  
  29.  
  30.  
  31.  
  32. target = texmf||'\os2tex\psutils'
  33.  
  34.  
  35. install = texmf||'\os2tex\install'
  36.  
  37.  
  38. if Pos("InstallFiles", options) > 0 then do
  39.  
  40.    if directory(texmf||'\os2tex') = '' then do
  41.       say errdir' - 'texmf
  42.       exit 1
  43.    end
  44.  
  45.    install||'\kdir '||target
  46.  
  47.  
  48.  
  49.    say msg.1
  50.  
  51.    install||'\unzip -o '||source||'\psutils.zip'
  52.  
  53. end
  54.  
  55.  
  56.  
  57.