[nongnu] elpa/vc-fossil c1585fc 040/111: Remove `vc-fossil-after-dir-status`.

[ELPA Syncer]

branch: elpa/vc-fossil
commit c1585fcb08a4233a92d87fda9c9c2ab0edb98ff7
Author: fifr <fifr>
Commit: fifr <fifr>

    Remove `vc-fossil-after-dir-status`.
---
 vc/el/vc-fossil.el | 14 --------------
 1 file changed, 14 deletions(-)

diff --git a/vc/el/vc-fossil.el b/vc/el/vc-fossil.el
index 0958c80..f53d5e6 100644
--- a/vc/el/vc-fossil.el
+++ b/vc/el/vc-fossil.el
@@ -143,20 +143,6 @@
             (push (list file (vc-fossil-state-code status-word)) result)))))
     (funcall update-function result nil)))
 
-(defun vc-fossil-after-dir-status (callback)
-  "Function to call after the status process has finished"
-  (let ((result '()))
-    (goto-char (point-min))
-    (while (not (eobp))
-      (let ((line (buffer-substring-no-properties (point) (line-end-position)))
-            (status-word '()))
-        (message line)
-        (let* ((state (vc-fossil-state-code (car (split-string line))))
-               (file (expand-file-name (substring line (+ (length status-word) 
1)))))
-          (setq result (cons (list file state) result))))
-      (forward-line))
-    (funcall callback result t)))
-
 (defun vc-fossil-checkout-model (files) 'implicit)
 
 (defun vc-fossil-dir-extra-headers (dir)