Mercurial > emacs
changeset 96880:938dd02137bc
(vc-dir-recompute-file-state): Add workaround for CVS.
| author | Dan Nicolaescu <dann@ics.uci.edu> |
|---|---|
| date | Tue, 22 Jul 2008 02:18:29 +0000 |
| parents | 2ba26c26640b |
| children | 44c60e2cb9ef |
| files | lisp/ChangeLog lisp/vc-dir.el |
| diffstat | 2 files changed, 9 insertions(+), 0 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/ChangeLog Tue Jul 22 02:17:21 2008 +0000 +++ b/lisp/ChangeLog Tue Jul 22 02:18:29 2008 +0000 @@ -1,3 +1,7 @@ +2008-07-22 Dan Nicolaescu <dann@ics.uci.edu> + + * vc-dir.el (vc-dir-recompute-file-state): Add workaround for CVS. + 2008-07-21 Chong Yidong <cyd@stupidchicken.com> * menu-bar.el (menu-bar-line-wrapping-menu): Use Visual Line mode
--- a/lisp/vc-dir.el Tue Jul 22 02:17:21 2008 +0000 +++ b/lisp/vc-dir.el Tue Jul 22 02:18:29 2008 +0000 @@ -772,6 +772,11 @@ (defun vc-dir-recompute-file-state (fname def-dir) (let* ((file-short (file-relative-name fname def-dir)) + (remove-me-when-CVS-works + (when (eq vc-dir-backend 'CVS) + ;; 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)) (state (vc-call-backend vc-dir-backend 'state fname)) (extra (vc-call-backend vc-dir-backend 'status-fileinfo-extra fname)))