From 9cad2da66e57cc3fa8cd01276599536ebc3931d2 Mon Sep 17 00:00:00 2001 From: Sean Whitton Date: Wed, 10 Jun 2026 13:37:57 +0100 Subject: [PATCH] ; Fix last change. --- lisp/vc/vc-dir.el | 8 ++++---- 1 file changed, 4 insertions(+), 4 deletions(-) diff --git a/lisp/vc/vc-dir.el b/lisp/vc/vc-dir.el index 7384cc81869..5d5aafac389 100644 --- a/lisp/vc/vc-dir.el +++ b/lisp/vc/vc-dir.el @@ -1275,10 +1275,10 @@ that file." ;; FIXME: Warning: UGLY HACK. The CVS backend caches the state ;; info, this forces the backend to update it. (vc-call-backend vc-dir-backend 'registered fname)) - (let ((default-directory def-dir) - (state (vc-call-backend vc-dir-backend 'state fname-short)) - (extra (vc-call-backend vc-dir-backend - 'status-fileinfo-extra fname-short))) + (let* ((default-directory def-dir) + (state (vc-call-backend vc-dir-backend 'state fname-short)) + (extra (vc-call-backend vc-dir-backend + 'status-fileinfo-extra fname-short))) ;; Ensure we return a nil state if the file does not exist and is ;; not tracked so that it disappears from VC-Dir (bug#81191). (if (and (eq state 'up-to-date) (not (file-exists-p fname)))