diff options
| author | Glenn Morris <rgm@gnu.org> | 2017-05-20 17:05:18 -0700 |
|---|---|---|
| committer | Glenn Morris <rgm@gnu.org> | 2017-05-20 17:05:18 -0700 |
| commit | 7f4e5ca8fb40ce13d7fd7979171ba87fe39cb254 (patch) | |
| tree | 35c0dabb7aa836455ee9ad7c4b0e90baf56c9baf /lisp/vc/vc-bzr.el | |
| parent | ed8b4e0c0c5da838e639d1505bdd090a7e2d735f (diff) | |
| download | emacs-7f4e5ca8fb40ce13d7fd7979171ba87fe39cb254.tar.gz | |
Prevent loading vc-bzr writing to ~/.bzr.log
* lisp/vc/vc-bzr.el (vc-bzr-status-switches): Disable bzr logging.
Diffstat (limited to 'lisp/vc/vc-bzr.el')
| -rw-r--r-- | lisp/vc/vc-bzr.el | 4 |
1 files changed, 3 insertions, 1 deletions
diff --git a/lisp/vc/vc-bzr.el b/lisp/vc/vc-bzr.el index 73d05c7bfce..d0e9f7744b8 100644 --- a/lisp/vc/vc-bzr.el +++ b/lisp/vc/vc-bzr.el @@ -98,7 +98,9 @@ If nil, use the value of `vc-annotate-switches'. If t, use no switches." (defcustom vc-bzr-status-switches (ignore-errors (with-temp-buffer - (call-process vc-bzr-program nil t nil "help" "status") + (let ((process-environment (cons (format "BZR_LOG=%s" null-device) + process-environment))) + (call-process vc-bzr-program nil t nil "help" "status")) (if (search-backward "--no-classify" nil t) "--no-classify"))) "String or list of strings specifying switches for bzr status under VC. |