Mercurial > emacs
comparison lisp/vc-cvs.el @ 94522:a69dcc2c42ae
Remove some XXX comments no longer needed.
| author | Eric S. Raymond <esr@snark.thyrsus.com> |
|---|---|
| date | Thu, 01 May 2008 19:28:56 +0000 |
| parents | 2a61c5f918a5 |
| children | 37fa7ba3820c |
comparison
equal
deleted
inserted
replaced
| 94521:2a61c5f918a5 | 94522:a69dcc2c42ae |
|---|---|
| 855 (let ((file (expand-file-name (match-string 1) dir))) | 855 (let ((file (expand-file-name (match-string 1) dir))) |
| 856 (unless (vc-file-getprop file 'vc-state) | 856 (unless (vc-file-getprop file 'vc-state) |
| 857 (vc-cvs-parse-entry file t)))) | 857 (vc-cvs-parse-entry file t)))) |
| 858 (forward-line 1)))) | 858 (forward-line 1)))) |
| 859 | 859 |
| 860 ;; XXX Experimental function for the vc-dired replacement. | |
| 861 (defun vc-cvs-after-dir-status (update-function) | 860 (defun vc-cvs-after-dir-status (update-function) |
| 862 ;; Heavily inspired by vc-cvs-parse-status. AKA a quick hack. | 861 ;; Heavily inspired by vc-cvs-parse-status. AKA a quick hack. |
| 863 ;; It needs a lot of testing. | 862 ;; This needs a lot of testing. |
| 864 (let ((status nil) | 863 (let ((status nil) |
| 865 (status-str nil) | 864 (status-str nil) |
| 866 (file nil) | 865 (file nil) |
| 867 (result nil) | 866 (result nil) |
| 868 (missing nil) | 867 (missing nil) |