emacs-diffs
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

master 86309ef: Simplify vc-git-log-switches's usage; change default val


From: Dmitry Gutov
Subject: master 86309ef: Simplify vc-git-log-switches's usage; change default value to nil
Date: Thu, 10 Jun 2021 21:39:46 -0400 (EDT)

branch: master
commit 86309efb4ad8fc0f3821254ba076834f24e71e4c
Author: Dmitry Gutov <dgutov@yandex.ru>
Commit: Dmitry Gutov <dgutov@yandex.ru>

    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 bd29b88..89f9800 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)))



reply via email to

[Prev in Thread] Current Thread [Next in Thread]