home *** CD-ROM | disk | FTP | other *** search
/ Meeting Pearls 3 / Meeting_Pearls_III.iso / Pearls / texmf / rexx / quit_tex.sd < prev    next >
Text File  |  1991-07-24  |  280b  |  17 lines
  1. /*
  2. ** ARexx Script to stop the "TeX-Server" script.
  3. **
  4. **            19.08.90    Georg Hessmann
  5. */
  6.  
  7. OPTIONS RESULTS
  8.  
  9.  
  10. IF (SHOW('P', 'Start_TeX')) THEN DO
  11.     okay2 "Really quit tex TeX-server?"
  12.     IF (RESULT == "1") THEN ADDRESS 'Start_TeX' 'quit'
  13.     END
  14. ELSE
  15.     okay1 "No TeX-server to quit!"
  16. EXIT 0
  17.