home *** CD-ROM | disk | FTP | other *** search
/ Fresh Fish 7 / FreshFishVol7.bin / bbs / comm / spot-1.3.lha / Spot / Rexx / Export.spot < prev    next >
Text File  |  1993-09-17  |  1KB  |  37 lines
  1. /***************************************************************************/
  2. /* Export.rexx   ©1993 Stu Churchill   2:250/107.97@fidonet                */
  3. /*                                                                         */
  4. /* $VER: Export.rexx 1.40 (17.9.93)                                        */
  5. /*                                                                         */
  6. /* Intended for use from a cron, to be called before polling for mail.     */
  7. /***************************************************************************/
  8.  
  9. options results
  10.  
  11. spot_path = 'Workbench:WBStartup/Spot CONFIGPATH "MAIL:Configs/Spot/"'
  12.  
  13. if ~show('ports','SPOT') then do
  14.   address command 'run 'spot_path
  15.   'WaitForPort SPOT'
  16.   quit = yes                  /* Marker to close SPOT after finishing */
  17. end
  18.  
  19. address 'SPOT'
  20. 'isiconified'
  21. if rc = 0 then do
  22.   icon = yes                  /* Marker to re-iconify after finishing */
  23.   'uniconify'
  24. end
  25. 'spot2front'
  26. 'export CLOSEWIN'             /* Export messages */
  27.  
  28. if quit = yes then do
  29.   'quitspot NOREQ'            /* Close SPOT if we had to open it ourselves */
  30.   exit
  31. end
  32. if icon = yes then do
  33.   'iconify NOREQ'             /* Re-iconify if necessary */
  34. end
  35.  
  36. exit
  37.