home *** CD-ROM | disk | FTP | other *** search
/ The AGA Experience 2 / agavol2.iso / software / utilities / comms / html-heaven / arexx / html-ed.rexx < prev    next >
OS/2 REXX Batch file  |  1996-01-08  |  760b  |  20 lines

  1. /* HTML-Helper Arexx script for Ed
  2.  * Ver      : 1.0 (7th January 1996)
  3.  * Copyright: Paul Kolenbrander (InterNet: paul@serena.iaehv.nl)
  4.  * Function : Pass on the HTML commands from HTML-Helper to Ed.
  5.  * Input    : HTMLCMD - The HTML command to be inserted.
  6. */
  7.  
  8. OPTIONS RESULTS                                /* enable return codes      */
  9. PARSE ARG MYCMD HTMLCMD
  10.  
  11. HTMLCMD = SUBSTR(HTMLCMD,2, LENGTH(HTMLCMD)-1) /* strip leading space      */
  12.  
  13. HTMLCMD = SUBSTR(HTMLCMD,2, LENGTH(HTMLCMD)-2) /* strip leading/trailing " */
  14.  
  15. ADDRESS 'Ed'                                   /* Default, edit if needed  */ 
  16.  
  17. 'i/'||HTMLCMD||'/'                             /* Insert at current pos.   */
  18.  
  19. EXIT                                           /* And exit the script.     */
  20.