Commit 21227135 authored by Stefan Monnier's avatar Stefan Monnier
Browse files

(log-edit-insert-cvs-rcstemplate): Ignore stderr.

parent 992ea464
2005-11-28 Stefan Monnier <monnier@iro.umontreal.ca>
 
* log-edit.el (log-edit-insert-cvs-rcstemplate): Ignore stderr.
* emacs-lisp/elp.el (elp-not-profilable): Replace interactive-p with
called-interactively-p.
(elp-profilable-p): Rename from elp-not-profilable-p.
......
......@@ -448,8 +448,10 @@ This contacts the repository to get the rcstemplate file and
can thus take some time."
(interactive)
(when (or (interactive-p) (= (point-min) (point-max)))
(when (file-readable-p "CVS/Entries")
(call-process "cvs" nil t nil "checkout" "-p" "CVSROOT/rcstemplate"))))
(when (file-readable-p "CVS/Root")
;; Ignore the stderr stuff, even if it's an error.
(call-process "cvs" nil '(t nil) nil
"checkout" "-p" "CVSROOT/rcstemplate"))))
(defun log-edit-insert-filenames ()
"Insert the list of files that are to be committed."
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment