home *** CD-ROM | disk | FTP | other *** search
/ The World of Computer Software / World_Of_Computer_Software-02-387-Vol-3of3.iso / e / epmtex12.zip / MYMNUINI.E < prev    next >
Text File  |  1993-02-19  |  2KB  |  49 lines
  1. /*
  2. ╔════════════════════════════════════════════════════════════════════════════╗
  3. ║ What's it called: EPMTeX V1.2c                                             ║
  4. ║                                                                            ║
  5. ║ What does it do:  The E source code for the EPMTeX enhancements V1.2c      ║
  6. ║                   for EPM. This file is included by PROCESSMENUINIT        ║
  7. ║                   in stdctrl.e for setting menu attributes                 ║
  8. ║                                                                            ║                                                                            ║
  9. ║                                                                            ║
  10. ║ Who and When:     Jon Hacker 2/93                                          ║
  11. ║                                                                            ║
  12. ╚════════════════════════════════════════════════════════════════════════════╝
  13. */
  14.  
  15. -------------------------------------------------------------------------------
  16.  
  17. -- since this file is included at the end of PROCESSMENUINIT we cannot put any
  18. -- global declarations here.  We need to use a procedure call to get the
  19. -- value of universal variables.
  20.  
  21.     tex_latex = get_tex_latex()
  22.     tex_user_defined = get_tex_user(0)
  23.     tex_user = get_tex_user(1)
  24.     tex_landscape = get_tex_landscape()
  25.     tex_auto_log = get_tex_auto_log()
  26.     tex_auto_save = get_tex_auto_save()
  27.     tex_syntax = get_tex_syntax(0)
  28.     tex_expand_on = get_tex_syntax(1)
  29.     tex_debug = get_tex_debug()
  30.     if menuid=9 then                                 -- TeX menu ID is 9
  31.         SetMenuAttribute( 909, 8192, not tex_latex)
  32.         if tex_user_defined then
  33.            SetMenuAttribute( 910, 8192, not tex_user)
  34.         endif
  35.         SetMenuAttribute( 911, 8192, not tex_landscape)
  36.         SetMenuAttribute( 912, 8192, not tex_auto_log)
  37.         SetMenuAttribute( 913, 8192, not tex_auto_save)
  38.         if tex_syntax then
  39.             SetMenuAttribute( 914, 8192, not tex_expand_on)
  40.         endif
  41.         SetMenuAttribute( 915, 8192, not tex_debug)
  42.         return
  43.     endif
  44.  
  45.  
  46.  
  47.  
  48.  
  49.