# HG changeset patch # User Eric S. Raymond # Date 1210065132 0 # Node ID 0a8a0c2b4cd308dbded156dd3d31906899fbeb22 # Parent 564d32dfad656e0581b0f2534d7f8f4b7e6b47d8 vc-responsible-backend needs to see absolute pathnames. diff -r 564d32dfad65 -r 0a8a0c2b4cd3 lisp/vc.el --- a/lisp/vc.el Tue May 06 08:27:27 2008 +0000 +++ b/lisp/vc.el Tue May 06 09:12:12 2008 +0000 @@ -2089,15 +2089,15 @@ (defun vc-generic-status-printer (fileentry) (let* ((file (vc-dir-fileinfo->name fileentry)) - (backend (vc-responsible-backend file))) + (backend (vc-responsible-backend (expand-file-name file)))) (vc-call-backend backend 'status-printer fileentry))) (defun vc-generic-state (file) - (let ((backend (vc-responsible-backend file))) + (let ((backend (vc-responsible-backend (expand-file-name file)))) (vc-call-backend backend 'state file))) (defun vc-generic-status-fileinfo-extra (file) - (let ((backend (vc-responsible-backend file))) + (let ((backend (vc-responsible-backend (expand-file-name file)))) (vc-call-backend backend 'status-fileinfo-extra file))) (defun vc-generic-dir-headers (dir)