]> git.eshelyaron.com Git - emacs.git/commitdiff
Add missing piece of earlier commit.
authorThierry Volpiatto <thierry.volpiatto@gmail.com>
Fri, 2 Sep 2011 07:54:34 +0000 (00:54 -0700)
committerGlenn Morris <rgm@gnu.org>
Fri, 2 Sep 2011 07:54:34 +0000 (00:54 -0700)
* lisp/vc/vc-rcs.el (vc-rcs-responsible-p): Handle directories.

Fixes: debbugs:9391
lisp/vc/vc-rcs.el

index 488efaa35226b9c5c5a7d0134c6b28fef3b44c62..8051009a983a6ce1ec1fa02478a21414f620e291 100644 (file)
@@ -314,7 +314,10 @@ expanded if `vc-keep-workfiles' is non-nil, otherwise, delete the workfile."
 (defun vc-rcs-responsible-p (file)
   "Return non-nil if RCS thinks it would be responsible for registering FILE."
   ;; TODO: check for all the patterns in vc-rcs-master-templates
-  (file-directory-p (expand-file-name "RCS" (file-name-directory file))))
+  (file-directory-p (expand-file-name "RCS"
+                                      (if (file-directory-p file)
+                                          file
+                                        (file-name-directory file)))))
 
 (defun vc-rcs-receive-file (file rev)
   "Implementation of receive-file for RCS."