home *** CD-ROM | disk | FTP | other *** search
/ OS/2 Shareware BBS: 10 Tools / 10-Tools.zip / seedump.zip / EXE / bstartup.bag < prev    next >
Text File  |  1995-08-18  |  411b  |  22 lines
  1. /*
  2.  * Author : a priori computer solutions GmbH
  3.  * Title  : Rexx-Utility
  4.  * Notice : Written 1995, the 27th of July
  5.  */
  6.  
  7. /*
  8.  * bstartup.bag
  9.  * is executed when bagger is ready to accept user input
  10.  */
  11.  
  12. env = "OS2ENVIRONMENT";
  13. r = value( "MYEXTRAPATH",, env );
  14. if (r <> "") then do
  15.    set symbols r;
  16.    set source r;
  17. end;
  18. /* set log "my.log" */
  19. say "Finished running bstartup.bag"
  20.  
  21. return;
  22.