Commit ac2c49f4 authored by Sam Steingold's avatar Sam Steingold
Browse files

(vc-dir-mode-hook): Add normal hook.

(vc-dir-mode): Run it.
parent 56a03d92
2008-04-29 Sam Steingold <>
* vc.el (vc-dir-mode-hook): Add normal hook.
(vc-dir-mode): Run it.
2008-04-29 Nick Roberts <>
* progmodes/gdb-ui.el (gdb-display-buffer): Don't pop up GUD buffer.
......@@ -6,7 +11,7 @@
(gdb-same-frame): Reverse initial value.
(gdb-display-gdb-buffer): Check for GUD buffer in other frames.
* progmodes/gud.el (gud-speedbar-buttons): Raise frame in
* progmodes/gud.el (gud-speedbar-buttons): Raise frame in
2008-04-29 Stefan Monnier <>
......@@ -832,6 +832,12 @@ version control backend imposes itself."
:type 'hook
:group 'vc)
(defcustom vc-dir-mode-hook nil
"Normal hook run by `vc-dir-mode'.
See `run-hooks'."
:type 'hook
:group 'vc)
;; Annotate customization
(defcustom vc-annotate-color-map
(if (and (tty-display-color-p) (<= (display-color-cells) 8))
......@@ -1592,7 +1598,7 @@ merge in the changes into your working copy."
(setq model (vc-checkout-model (car files)))
(setq state (vc-state file))
;; Verify that the fileset is homogeneous
(dolist (file (cdr files))
;; Ignore directories, they are compatible with anything.
......@@ -3046,7 +3052,8 @@ specific headers."
;; Make sure that if the VC status buffer is killed, the update
;; process running in the background is also killed.
(add-hook 'kill-buffer-query-functions 'vc-dir-kill-query nil t)
(run-hooks 'vc-dir-mode-hook))
(put 'vc-dir-mode 'mode-class 'special)
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment