home *** CD-ROM | disk | FTP | other *** search
/ The Developer Connection…ice Driver Kit for OS/2 3 / DEV3-D1.ISO / editors / epm / e_macros / exit.e < prev    next >
Encoding:
Text File  |  1991-06-10  |  574 b   |  16 lines
  1. -- New file in EOS2.  This is included early in STDCNF.E so it comes BEFORE
  2. -- any other defexit macros defined by the user.  If the user says, "Yes, exit"
  3. -- we simply continue on to the other defexit's as before.
  4. -- If the user says "No" we stop right here.
  5.  
  6. defexit
  7.    if askyesno(ABOUT_TO_EXIT__MSG)<> YES_CHAR then
  8.       -- To tell E not to exit, turn off the switch exit_after_last_file.
  9.       exit_after_last_file = 0
  10.       stop
  11.    endif
  12.    -- Else tell E it's okay to leave.
  13.    exit_after_last_file = 1
  14.    -- And continue on to the other defexit's.
  15.  
  16.