From 86309efb4ad8fc0f3821254ba076834f24e71e4c Mon Sep 17 00:00:00 2001 From: Dmitry Gutov Date: Fri, 11 Jun 2021 04:39:34 +0300 Subject: [PATCH] Simplify vc-git-log-switches's usage; change default value to nil * lisp/vc/vc-git.el (vc-git-log-switches): Do not mention or allow the value 't' anymore (https://lists.gnu.org/archive/html/emacs-devel/2021-06/msg00452.html). (vc-git-print-log): Use 'vc-git-log-switches' directly. --- lisp/vc/vc-git.el | 12 ++++++------ 1 file changed, 6 insertions(+), 6 deletions(-) diff --git a/lisp/vc/vc-git.el b/lisp/vc/vc-git.el index bd29b88e87d..89f9800a1b5 100644 --- a/lisp/vc/vc-git.el +++ b/lisp/vc/vc-git.el @@ -127,9 +127,9 @@ If nil, use the value of `vc-annotate-switches'. If t, use no switches." (repeat :tag "Argument List" :value ("") string)) :version "25.1") -(defcustom vc-git-log-switches t +(defcustom vc-git-log-switches nil "String or list of strings specifying switches for Git log under VC." - :type '(choice (const :tag "None" t) + :type '(choice (const :tag "None" nil) (string :tag "Argument String") (repeat :tag "Argument List" :value ("") string)) :version "28.1") @@ -1171,10 +1171,10 @@ If LIMIT is a revision string, use it as an end-revision." (when shortlog `("--graph" "--decorate" "--date=short" ,(format "--pretty=tformat:%s" - (car vc-git-root-log-format)) - "--abbrev-commit")) - (vc-switches 'git 'log) - (when (numberp limit) + (car vc-git-root-log-format)) + "--abbrev-commit")) + vc-git-log-switches + (when (numberp limit) (list "-n" (format "%s" limit))) (when start-revision (if (and limit (not (numberp limit))) -- 2.39.5