procyberian/emacs
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

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

Browse source
This commit is contained in:
Stefan Monnier 2005-11-28 22:31:47 +00:00
parent 992ea464ed
commit 2122713598
2 changed files with 6 additions and 2 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

2
lisp/ChangeLog
View file

@ -1,5 +1,7 @@
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.

6
lisp/log-edit.el
View file

@ -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."