home *** CD-ROM | disk | FTP | other *** search
/ The Fred Fish Collection 1.5 / ffcollection-1-5-1992-11.iso / ff_disks / 200-299 / ff289.lzh / TreeWalk / mginsert.ftw < prev    next >
Text File  |  1989-12-12  |  918b  |  27 lines
  1. /*
  2.  * treewalk macro to insert the file name found into an mg buffer.
  3.  *
  4.  *    Copyright (C) 1989  Mike Meyer
  5.  *
  6.  *    This program is free software; you can redistribute it and/or modify
  7.  *    it under the terms of the GNU General Public License as published by
  8.  *    the Free Software Foundation; either version 1, or any later version.
  9.  *
  10.  *    This program is distributed in the hope that it will be useful,
  11.  *    but WITHOUT ANY WARRANTY; without even the implied warranty of
  12.  *    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  13.  *    GNU General Public License for more details.
  14.  *
  15.  *    You should have received a copy of the GNU General Public License
  16.  *    along with this program; if not, write to the Free Software
  17.  *    Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
  18.  */
  19. if ~show('Ports', 'mg') then do
  20.     address command
  21.     'run mg'
  22.     'waitforport mg'
  23.     end
  24.  
  25. address 'mg' 'rexx-insert "'arg(1) || arg(2)'\n"'
  26. return 1
  27.