comparison lisp/vc-git.el @ 92093:a0193ceeaa83

* vc.el (vc-exec-after): Move setting mode-line-process in the busy case ... (vc-set-mode-line-busy-indicator): ... in this new function. (vc-status-refresh): Call vc-set-mode-line-busy-indicator. (vc-update-vc-status-buffer): Reset mode-line-process. (vc-status-mark-all-files, vc-status-unmark-all-files): Change to mark/unmark all the files with the same state as the current one. With a prefix argument mark/unmark all files. (vc-status-mode-menu): Adjust strings. (vc-update-vc-status-buffer): Only do something when the argument is not nil. (vc-status-kill-dir-status-process): New function. (vc-status-mode-map): Bind it. (vc-status-process-buffer): New variable. (vc-status-mode): Make it local. (vc-status-refresh): Set it. * vc-hg.el (vc-hg-dir-status): * vc-git.el (vc-git-dir-status): * vc-svn.el (vc-svn-dir-status): Return the buffer in which the command is run.
author Dan Nicolaescu <dann@ics.uci.edu>
date Fri, 22 Feb 2008 07:44:08 +0000
parents 3299b785d830
children 01d3fd1a2cfe
comparison
equal deleted inserted replaced
92092:cb361bd1b322 92093:a0193ceeaa83
250 "-m" ; modified 250 "-m" ; modified
251 "-o" ; others 251 "-o" ; others
252 "--directory" 252 "--directory"
253 "--exclude-per-directory=.gitignore") 253 "--exclude-per-directory=.gitignore")
254 (vc-exec-after 254 (vc-exec-after
255 `(vc-git-after-dir-status (quote ,update-function) ,status-buffer)))) 255 `(vc-git-after-dir-status (quote ,update-function) ,status-buffer))
256 (current-buffer)))
256 257
257 ;;; STATE-CHANGING FUNCTIONS 258 ;;; STATE-CHANGING FUNCTIONS
258 259
259 (defun vc-git-create-repo () 260 (defun vc-git-create-repo ()
260 "Create a new Git repository." 261 "Create a new Git repository."