[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[Emacs-diffs] master 51170f3: Honor 'vc-bzr-log-switches' in 'vc-bzr-exp
From: |
Eli Zaretskii |
Subject: |
[Emacs-diffs] master 51170f3: Honor 'vc-bzr-log-switches' in 'vc-bzr-expanded-log-entry' |
Date: |
Sat, 8 Dec 2018 04:35:34 -0500 (EST) |
branch: master
commit 51170f34acb8f5c420f728f3e755be2f8961ef11
Author: Steven De Herdt <address@hidden>
Commit: Eli Zaretskii <address@hidden>
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
---
lisp/vc/vc-bzr.el | 6 +++++-
1 file changed, 5 insertions(+), 1 deletion(-)
diff --git a/lisp/vc/vc-bzr.el b/lisp/vc/vc-bzr.el
index 8e1a6be..e6d636f 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."
(defun vc-bzr-expanded-log-entry (revision)
(with-temp-buffer
(apply 'vc-bzr-command "log" t nil nil
- (list "--long" (format "-r%s" revision)))
+ (append
+ (list "--long" (format "-r%s" revision))
+ (if (stringp vc-bzr-log-switches)
+ (list vc-bzr-log-switches)
+ vc-bzr-log-switches)))
(goto-char (point-min))
(when (looking-at "^-+\n")
;; Indent the expanded log entry.
[Prev in Thread] |
Current Thread |
[Next in Thread] |
- [Emacs-diffs] master 51170f3: Honor 'vc-bzr-log-switches' in 'vc-bzr-expanded-log-entry',
Eli Zaretskii <=