"Duncan Mak" [off-list ref] writes:
quoted hunk ↗ jump to hunk
--- a/contrib/emacs/vc-git.el
+++ b/contrib/emacs/vc-git.el
@@ -58,7 +58,7 @@
(with-temp-buffer
(let* ((dir (file-name-directory file))
(name (file-relative-name file dir)))
- (when dir (cd dir))
+ (when (file-exists-p dir) (cd dir))
(and (ignore-errors (eq 0 (call-process "git" nil '(t nil) nil"ls-files" "-c" "-z" "--" name)))
(let ((str (buffer-string)))
(and (> (length str) (length name))
I wonder what would happen when (file-name-directory file)
returns nil with this change...