From fb34883fdfb24a7fedff2d61db18e876cc601ff7 Mon Sep 17 00:00:00 2001 From: =?utf8?q?Andr=C3=A9=20Spiegel?= Date: Sun, 10 Oct 2004 09:23:11 +0000 Subject: [PATCH] (vc-annotate-mode): Remove variable. (vc-annotate-display-select): Only call vc-annotate-mode if we're not in that mode already. --- lisp/vc.el | 5 +---- 1 file changed, 1 insertion(+), 4 deletions(-) diff --git a/lisp/vc.el b/lisp/vc.el index 663c45fd466..3f562905280 100644 --- a/lisp/vc.el +++ b/lisp/vc.el @@ -646,9 +646,6 @@ List of factors, used to expand/compress the time scale. See `vc-annotate'." :group 'vc) ;; vc-annotate functionality (CVS only). -(defvar vc-annotate-mode nil - "Variable indicating if VC-Annotate mode is active.") - (defvar vc-annotate-mode-map (let ((m (make-sparse-keymap))) (define-key m [menu-bar] (make-sparse-keymap "VC-Annotate")) @@ -3004,7 +3001,7 @@ use; you may override this using the second optional arg MODE." (when buffer (set-buffer buffer) (display-buffer buffer)) - (if (not vc-annotate-mode) ; Turn on vc-annotate-mode if not done + (if (not vc-annotate-parent-ref) (vc-annotate-mode)) (cond ((null vc-annotate-display-mode) (vc-annotate-display-default vc-annotate-ratio)) -- 2.39.5