
(autoload (quote cvs-update) "pcl-cvs" "\
Run a 'cvs update' in the current working directory. Feed the
output to a *cvs* buffer and run cvs-mode on it.
If optional prefix argument LOCAL is non-nil, 'cvs update -l' is run." t)

(setq cvs-program "GNU:AmiCVS/bin/cvs")

(setq cvs-diff-program "rcs:bin/diff")

(setq cvs-rm-program "c:delete")

(setq cvs-shell "bin:sh")

(setq cvs-tempdir "T:")

(defvar cvs-header-file (expand-file-name "CVSROOT:CVSheaders/") "\
File name to load cvs header.")

(defun cvs-insert-header (&optional file) "\
Inserts a cvs header from FILE to top of the current buffer.
If FILE is nil, you are ask for a file name" (interactive) (byte-code "Γ? ΔΕ		Β$ebΖ	!" [file cvs-header-file t nil read-file-name "Load cvs header from file: " insert-file] 5))

(global-set-key "u" (quote cvs-update))

(global-set-key "i" (quote cvs-insert-header))
