home *** CD-ROM | disk | FTP | other *** search
/ OS/2 Shareware BBS: 5 Edit / 05-Edit.zip / enh_e130.zip / PrePlug.cmd < prev    next >
OS/2 REXX Batch file  |  1999-12-09  |  754b  |  20 lines
  1. /* PrePlugin for the Enhanced E                     */
  2. /* Tries to locate an existing installation         */
  3. /*                                                  */
  4.  
  5. /* The editor stores it's location here             */
  6. rc = Sysini('USER', 'EEE', 'Directory')
  7.  
  8. /* If not ERROR: then it should be a good directory */
  9. if rc <> 'ERROR:' then do
  10.   /* Set the InstDir variable to the new directory  */
  11.   InstDir = rc
  12.   /* Set the entry field to the new directory       */
  13.   CALL VpSetItemValue DirWin,1003,InstDir
  14. end
  15.  
  16. /* Add a line to your PostPlug to delete this file  */
  17. /* ex: rc = SysFileDelete(InstDir||'\PrePlug.cmd')  */
  18.  
  19. /* It should work seamlessly with the user          */
  20. /* thinking that you are a genius!                  */