home *** CD-ROM | disk | FTP | other *** search
/ OS/2 Shareware BBS: 35 Internet / 35-Internet.zip / slip-cm.zip / DemandGopher.CMD < prev    next >
OS/2 REXX Batch file  |  1994-03-29  |  618b  |  26 lines
  1. /******************************************************************/
  2. /*                                                                */
  3. /******************************************************************/
  4.  
  5. trace OFF
  6.  
  7.   signal on HALT name CLEANUP
  8.   signal on FAILURE name CLEANUP
  9.   signal on SYNTAX name CLEANUP
  10.  
  11.   parse arg parameters
  12.  
  13.   if \CMStart(DemandGopher, 1) then 
  14.     say date(USA) time() "001S connection could not be started"
  15.   else do
  16.    '@echo off'
  17.    'd:'
  18.    'chdir \scratch\staging'
  19.    'gopher' parameters
  20.   end /* else */
  21.  
  22. CLEANUP: 
  23.  
  24.   call CMStop DemandGopher
  25.  
  26. return (RC)