Function: tags-table-list-member

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

Signature

(tags-table-list-member FILE LIST)

Documentation

Like (member FILE LIST) after applying tags-expand-table-name.

More precisely, apply tags-expand-table-name to FILE and each element of LIST, returning the link whose car is the first match. If an element of LIST is t, ignore it.

Source Code

;; Defined in /usr/src/emacs/lisp/progmodes/etags.el.gz
;; Like member, but comparison is done after tags-expand-table-name on both
;; sides and elements of LIST that are t are skipped.
(defun tags-table-list-member (file list)
  "Like (member FILE LIST) after applying `tags-expand-table-name'.
More precisely, apply `tags-expand-table-name' to FILE
and each element of LIST, returning the link whose car is the first match.
If an element of LIST is t, ignore it."
  (setq file (tags-expand-table-name file))
  (while (and list
	      (or (eq (car list) t)
		  (not (string= file (tags-expand-table-name (car list))))))
    (setq list (cdr list)))
  list)