branch: elpa/vc-fossil
commit 0bd29aec05cdf1fc81ada064900519a13b79e071
Author: venkat <venkat>
Commit: venkat <venkat>
Simplified version of vc-fossil-registered.
---
vc/el/vc-fossil.el | 16 ++++++----------
1 file changed, 6 insertions(+), 10 deletions(-)
diff --git a/vc/el/vc-fossil.el b/vc/el/vc-fossil.el
index 8c3ecfc..9f7486e 100644
--- a/vc/el/vc-fossil.el
+++ b/vc/el/vc-fossil.el
@@ -81,16 +81,12 @@
(defun vc-fossil-registered (file)
"Check whether FILE is registered with fossil."
- (when (vc-fossil-root file)
- (with-temp-buffer
- (let* ((dir (file-name-directory file))
- (name (file-relative-name file dir))
- (str (ignore-errors
- (when dir (cd dir))
- (vc-fossil--out-ok "finfo" "-s" name)
- (buffer-string))))
- (and str
- (not (string= (substring str 0 7) "unknown")))))))
+ (with-temp-buffer
+ (let* ((str (ignore-errors
+ (vc-fossil--out-ok "finfo" "-s" (file-truename file))
+ (message (buffer-string)))))
+ (and str
+ (not (string= (substring str 0 7) "unknown"))))))
(defun vc-fossil-state-code (code)
(if (not code)
