Function: etags-recognize-tags-table

etags-recognize-tags-table is a byte-compiled function defined in etags.el.gz.

Signature

(etags-recognize-tags-table)

Documentation

If etags-verify-tags-table, make buffer-local format variables.

If current buffer is a valid etags TAGS file, then give it buffer-local values of tags table format variables.

Source Code

;; Defined in /usr/src/emacs/lisp/progmodes/etags.el.gz
;; `etags' TAGS file format support.

(defun etags-recognize-tags-table ()
  "If `etags-verify-tags-table', make buffer-local format variables.
If current buffer is a valid etags TAGS file, then give it
buffer-local values of tags table format variables."
  (when (etags-verify-tags-table)
    (setq-local file-of-tag-function 'etags-file-of-tag)
    (setq-local tags-table-files-function 'etags-tags-table-files)
    (setq-local tags-completion-table-function 'etags-tags-completion-table)
    (setq-local snarf-tag-function 'etags-snarf-tag)
    (setq-local goto-tag-location-function 'etags-goto-tag-location)
    (setq-local find-tag-regexp-search-function 're-search-forward)
    (setq-local find-tag-regexp-tag-order '(tag-re-match-p))
    (setq-local find-tag-regexp-next-line-after-failure-p t)
    (setq-local find-tag-search-function 'search-forward)
    (setq-local find-tag-tag-order '(tag-exact-file-name-match-p
                                     tag-file-name-match-p
                                     tag-exact-match-p
                                     tag-implicit-name-match-p
                                     tag-symbol-match-p
                                     tag-word-match-p
                                     tag-partial-file-name-match-p
                                     tag-any-match-p))
    (setq-local find-tag-next-line-after-failure-p nil)
    (setq-local list-tags-function 'etags-list-tags)
    (setq-local tags-apropos-function 'etags-tags-apropos)
    (setq-local tags-included-tables-function 'etags-tags-included-tables)
    (setq-local verify-tags-table-function 'etags-verify-tags-table)))