Mercurial > emacs

comparison lisp/vc-git.el @ 79687:2fe98820fa48

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
* vc-git.el (vc-git-dir-state): * vc-hg.el (vc-hg-dir-state): Set the vc-backend property.
author Dan Nicolaescu <dann@ics.uci.edu>
date Fri, 04 Jan 2008 07:59:25 +0000
parents 5f49af3d292b
children 73661ddc7ac7
comparison
equal deleted inserted replaced
79686:06c5a50f7aa2 79687:2fe98820fa48
165 ;; R removed/deleted 165 ;; R removed/deleted
166 ;; K to be killed 166 ;; K to be killed
167 ;; should not show up in vc-dired, so don't deal with them 167 ;; should not show up in vc-dired, so don't deal with them
168 ;; here. 168 ;; here.
169 ((eq status-char ?H) 169 ((eq status-char ?H)
170 (vc-file-setprop file 'vc-backend 'Git)
170 (vc-file-setprop file 'vc-state 'up-to-date)) 171 (vc-file-setprop file 'vc-state 'up-to-date))
171 ((eq status-char ?M) 172 ((eq status-char ?M)
173 (vc-file-setprop file 'vc-backend 'Git)
172 (vc-file-setprop file 'vc-state 'edited)) 174 (vc-file-setprop file 'vc-state 'edited))
173 ((eq status-char ?C) 175 ((eq status-char ?C)
176 (vc-file-setprop file 'vc-backend 'Git)
174 (vc-file-setprop file 'vc-state 'edited)) 177 (vc-file-setprop file 'vc-state 'edited))
175 ((eq status-char ??) 178 ((eq status-char ??)
176 (vc-file-setprop file 'vc-backend 'none) 179 (vc-file-setprop file 'vc-backend 'none)
177 (vc-file-setprop file 'vc-state 'nil))) 180 (vc-file-setprop file 'vc-state 'nil)))
178 (forward-line))))) 181 (forward-line)))))