Function: cvs-prefix-get

cvs-prefix-get is a byte-compiled function defined in pcvs-util.el.gz.

Signature

(cvs-prefix-get SYM &optional READ-ONLY)

Documentation

Return the current value of the prefix SYM.

And reset it unless READ-ONLY is non-nil.

Source Code

;; Defined in /usr/src/emacs/lisp/vc/pcvs-util.el.gz
(defun cvs-prefix-get (sym &optional read-only)
  "Return the current value of the prefix SYM.
And reset it unless READ-ONLY is non-nil."
  (prog1 (symbol-value sym)
    (unless (or read-only
		(cvs-flags-persist (symbol-value (cvs-prefix-sym sym))))
      (set sym nil)
      (force-mode-line-update))))