home *** CD-ROM | disk | FTP | other *** search
/ Excalibur 58 / Excalibur_58_cd.bin / amiga / comm / mail / fixmail.lha / FixMail.br next >
Text File  |  1996-07-24  |  688b  |  24 lines
  1. /* FixMail.br by Neil Bothwick               */
  2. /* Sets flags on email conference to fix bug */
  3. /* in Thor4Demon installer                   */
  4.  
  5. System = 'Demon'                     /* The name of your Demon system */
  6. Conf   = 'EMail'
  7.  
  8. CDF_MEMBER_OF           = '00000001'x  /* Member of this conference. */
  9. CDF_MAIL                = '00000002'x  /* Private mail conference. */
  10.  
  11. if ~show('p', 'BBSREAD') then do
  12.     address command
  13.     'run >nil: `GetEnv THOR/THORPath`bin/LoadBBSRead'
  14.     'WaitForPort BBSREAD'
  15.     end
  16.  
  17. address 'BBSREAD'
  18.  
  19. CONFIGCONF bbsname '"'System'"' confname '"'Conf'"' SET c2x(CDF_MEMBER_OF)
  20. CONFIGCONF bbsname '"'System'"' confname '"'Conf'"' SET c2x(CDF_MAIL)
  21.  
  22.  
  23.  
  24.