Function: comint-completion-file-name-table

comint-completion-file-name-table is a byte-compiled function defined in comint.el.gz.

Signature

(comint-completion-file-name-table STRING PRED ACTION)

Source Code

;; Defined in /usr/src/emacs/lisp/comint.el.gz
(defun comint-completion-file-name-table (string pred action)
  (if (not (file-name-absolute-p string))
      (completion-file-name-table string pred action)
    (cond
     ((memq action '(t lambda))
      (completion-file-name-table
       (concat comint-file-name-prefix string) pred action))
     ((null action)
      (let ((res (completion-file-name-table
                  (concat comint-file-name-prefix string) pred action)))
        (if (and (stringp res)
                 (string-match
                  (concat "\\`" (regexp-quote comint-file-name-prefix))
                  res))
            (substring res (match-end 0))
          res)))
     (t (completion-file-name-table string pred action)))))