Function: org-ctags--visit-tags-table

org-ctags--visit-tags-table is a byte-compiled function defined in org-ctags.el.gz.

Signature

(org-ctags--visit-tags-table)

Documentation

Load tags for current file.

A function for `org-mode-hook.

Source Code

;; Defined in /usr/src/emacs/lisp/org/org-ctags.el.gz
(defun org-ctags--visit-tags-table ()
  "Load tags for current file.
A function for `org-mode-hook."
  (when (and org-ctags-enabled-p
             (buffer-file-name))
    ;; Make sure this file's directory is added to default
    ;; directories in which to search for tags.
    (let ((tags-filename
           (expand-file-name
            (concat (file-name-directory (buffer-file-name))
                    "/TAGS"))))
      (when (file-exists-p tags-filename)
        (visit-tags-table tags-filename)))))