Function: cvs-dired-noselect

cvs-dired-noselect is a byte-compiled function defined in pcvs.el.gz.

Signature

(cvs-dired-noselect DIR)

Documentation

Run cvs-examine if DIR is a CVS administrative directory.

The exact behavior is determined also by cvs-dired-use-hook.

Source Code

;; Defined in /usr/src/emacs/lisp/vc/pcvs.el.gz
;;;###autoload
(progn (defun cvs-dired-noselect (dir)
  "Run `cvs-examine' if DIR is a CVS administrative directory.
The exact behavior is determined also by `cvs-dired-use-hook'."
  (when (stringp dir)
    (setq dir (directory-file-name dir))
    (when (and (string= "CVS" (file-name-nondirectory dir))
	       (file-readable-p (expand-file-name "Entries" dir))
	       cvs-dired-use-hook
	       (if (eq cvs-dired-use-hook 'always)
		   (not current-prefix-arg)
		 (equal current-prefix-arg cvs-dired-use-hook)))
      (save-excursion
	(funcall cvs-dired-action (file-name-directory dir) t t))))))