home *** CD-ROM | disk | FTP | other *** search
/ World of A1200 / World_Of_A1200.iso / programs / text / tpp / rexx / updatepreview.tpl < prev    next >
Text File  |  1995-02-27  |  246b  |  13 lines
  1. /* Update Preview - Macro */
  2.  
  3. parse arg filename pagenr .
  4. options results
  5.  
  6. if filename == "" then exit
  7.  
  8. /* preview already running? */
  9. if show('P', 'TEXPREVIEW') then do
  10.    address 'TEXPREVIEW' 'ToFront'
  11.    address 'TEXPREVIEW' 'Activate'
  12.    end
  13.