home *** CD-ROM | disk | FTP | other *** search
/ InfoMagic Source Code 1993 July / THE_SOURCE_CODE_CD_ROM.iso / gnu / lucid / bug-lucid-emacs / text0181.txt < prev    next >
Encoding:
Text File  |  1993-07-04  |  1.1 KB  |  34 lines

  1. To whoever it may concern:
  2.  
  3. When etags is loaded, the following lines are executed at top level:
  4.  
  5. etags> ;; Sample uses of find-tag-hook and find-tag-default-hook
  6. etags> ;; Example buffer-local tag finding
  7. etags> (or (boundp 'emacs-lisp-mode-hook)
  8. etags>     (setq emacs-lisp-mode-hook nil))
  9. etags> (if (eq (car-safe emacs-lisp-mode-hook) 'lambda)
  10. etags>     (setq emacs-lisp-mode-hook (list emacs-lisp-mode-hook)))
  11. etags> (or (memq 'setup-emacs-lisp-default-tag-hook emacs-lisp-mode-hook)
  12. etags>     (setq emacs-lisp-mode-hook
  13. etags>           (cons 'setup-emacs-lisp-default-tag-hook emacs-lisp-mode-hook)))
  14.  
  15. I have the following lines in my .emacs:
  16.  
  17. .emacs> (defun my-lisp-hook ()
  18. .emacs>   (setq comment-start "; ")
  19. .emacs>   (modify-syntax-entry ?- "w"))
  20. .emacs> (setq emacs-lisp-mode-hook 'my-lisp-hook)
  21.  
  22. my-lisp-hook is a legal hook, but etags does not accept it.  I get an
  23. error in the line with "memq".
  24.  
  25. Regards,
  26.         Thorbjoern
  27.         
  28.  
  29. -- 
  30. ThH, Thorbjoern Hansen, hansen@forwiss.uni-passau.de, thansen@diku.dk
  31. You may write in German, Spanish, Swedish, Danish or even English.
  32. I collect emacs lisp files.  Mail me (the name of) your favorite.
  33.  
  34.