aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorSteven De Herdt2018-11-24 23:57:57 +0100
committerEli Zaretskii2018-12-08 11:34:09 +0200
commit51170f34acb8f5c420f728f3e755be2f8961ef11 (patch)
tree0800b61e64418bb48655ef598925a57e84f74609
parent7e9f62c0bc3b4f3d47deb5917c90ea449a19460b (diff)
downloademacs-51170f34acb8f5c420f728f3e755be2f8961ef11.tar.gz
emacs-51170f34acb8f5c420f728f3e755be2f8961ef11.zip
Honor 'vc-bzr-log-switches' in 'vc-bzr-expanded-log-entry'
* lisp/vc/vc-bzr.el (vc-bzr-expanded-log-entry): Honor 'vc-bzr-log-switches'. (Bug#33494) Copyright-paperwork-exempt: yes
-rw-r--r--lisp/vc/vc-bzr.el6
1 files changed, 5 insertions, 1 deletions
diff --git a/lisp/vc/vc-bzr.el b/lisp/vc/vc-bzr.el
index 8e1a6bec203..e6d636f23c5 100644
--- a/lisp/vc/vc-bzr.el
+++ b/lisp/vc/vc-bzr.el
@@ -782,7 +782,11 @@ If LIMIT is non-nil, show no more than this many entries."
782(defun vc-bzr-expanded-log-entry (revision) 782(defun vc-bzr-expanded-log-entry (revision)
783 (with-temp-buffer 783 (with-temp-buffer
784 (apply 'vc-bzr-command "log" t nil nil 784 (apply 'vc-bzr-command "log" t nil nil
785 (list "--long" (format "-r%s" revision))) 785 (append
786 (list "--long" (format "-r%s" revision))
787 (if (stringp vc-bzr-log-switches)
788 (list vc-bzr-log-switches)
789 vc-bzr-log-switches)))
786 (goto-char (point-min)) 790 (goto-char (point-min))
787 (when (looking-at "^-+\n") 791 (when (looking-at "^-+\n")
788 ;; Indent the expanded log entry. 792 ;; Indent the expanded log entry.