(vc-cvs-could-register): Don't use file-directory-p to

check if the file "CVS/Entries" exists.
This commit is contained in:
Lute Kamstra 2008-12-04 18:10:34 +00:00
parent bf6bfba823
commit fcb61bee01
2 changed files with 8 additions and 2 deletions

View file

@ -1,3 +1,8 @@
2008-12-04 Lute Kamstra <lute@gnu.org>
* vc-cvs.el (vc-cvs-could-register): Don't use file-directory-p to
check if the file "CVS/Entries" exists.
2008-12-04 Juanma Barranquero <lekktu@gmail.com>
* international/mule-diag.el (list-character-sets): Doc fix.

View file

@ -306,9 +306,10 @@ its parents."
(while (and (stringp dir)
(not (equal dir (setq dir (file-name-directory dir))))
dir)
(setq dir (if (file-directory-p
(setq dir (if (file-exists-p
(expand-file-name "CVS/Entries" dir))
t (directory-file-name dir))))
t
(directory-file-name dir))))
(eq dir t)))
(defun vc-cvs-checkin (files rev comment)