aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorStefan Monnier2006-04-11 23:05:31 +0000
committerStefan Monnier2006-04-11 23:05:31 +0000
commit8a8f8697fe793055cf10c6081de7c5675151ed1e (patch)
tree2891a025be3516bbe53d86a130ca3ef3e2e90d86
parent21bc768b9b693f97940c56b9f4e80b9a7f486e34 (diff)
downloademacs-8a8f8697fe793055cf10c6081de7c5675151ed1e.tar.gz
emacs-8a8f8697fe793055cf10c6081de7c5675151ed1e.zip
(vc-ensure-vc-buffer): Only change current-buffer, not the window config.
(vc-annotate-display-select): Select the buffer so that current-buffer (and selected-window) is the output buffer at the end of vc-annotate.
-rw-r--r--lisp/ChangeLog9
-rw-r--r--lisp/vc.el6
2 files changed, 10 insertions, 5 deletions
diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index dbc1231354c..b7dcf022996 100644
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,6 +1,13 @@
12006-04-11 Stefan Monnier <monnier@iro.umontreal.ca>
2
3 * vc.el (vc-ensure-vc-buffer): Only change current-buffer, not the
4 window configuration.
5 (vc-annotate-display-select): Select the buffer so that current-buffer
6 (and selected-window) is the output buffer at the end of vc-annotate.
7
12006-04-11 J.D. Smith <jdsmith@as.arizona.edu> 82006-04-11 J.D. Smith <jdsmith@as.arizona.edu>
2 9
3 * vc.el (vc-annotate-color-map): Added custom TTY color map for 10 * vc.el (vc-annotate-color-map): Add custom TTY color map for
4 8-color terminals, to use all of the colors in a sensible order. 11 8-color terminals, to use all of the colors in a sensible order.
5 256-color terminals work well with the standard map. 12 256-color terminals work well with the standard map.
6 (vc-annotate-lines): Only strip the first color character if it 13 (vc-annotate-lines): Only strip the first color character if it
diff --git a/lisp/vc.el b/lisp/vc.el
index 96d85e7b1e0..19b2f0f4a72 100644
--- a/lisp/vc.el
+++ b/lisp/vc.el
@@ -886,7 +886,7 @@ However, before executing BODY, find FILE, and after BODY, save buffer."
886 (if vc-dired-mode 886 (if vc-dired-mode
887 (set-buffer (find-file-noselect (dired-get-filename))) 887 (set-buffer (find-file-noselect (dired-get-filename)))
888 (while vc-parent-buffer 888 (while vc-parent-buffer
889 (pop-to-buffer vc-parent-buffer)) 889 (set-buffer vc-parent-buffer))
890 (if (not buffer-file-name) 890 (if (not buffer-file-name)
891 (error "Buffer %s is not associated with a file" (buffer-name)) 891 (error "Buffer %s is not associated with a file" (buffer-name))
892 (if (not (vc-backend buffer-file-name)) 892 (if (not (vc-backend buffer-file-name))
@@ -3047,9 +3047,7 @@ BUFFER. `vc-annotate-display-mode' specifies the highlighting mode to
3047use; you may override this using the second optional arg MODE." 3047use; you may override this using the second optional arg MODE."
3048 (interactive) 3048 (interactive)
3049 (if mode (setq vc-annotate-display-mode mode)) 3049 (if mode (setq vc-annotate-display-mode mode))
3050 (when buffer 3050 (pop-to-buffer (or buffer (current-buffer)))
3051 (set-buffer buffer)
3052 (display-buffer buffer))
3053 (cond ((null vc-annotate-display-mode) 3051 (cond ((null vc-annotate-display-mode)
3054 ;; The ratio is global, thus relative to the global color-map. 3052 ;; The ratio is global, thus relative to the global color-map.
3055 (kill-local-variable 'vc-annotate-color-map) 3053 (kill-local-variable 'vc-annotate-color-map)