[Emacs-diffs] master 7f4e5ca: Prevent loading vc-bzr writing to ~/.bzr.log

[Glenn Morris]

branch: master
commit 7f4e5ca8fb40ce13d7fd7979171ba87fe39cb254
Author: Glenn Morris <address@hidden>
Commit: Glenn Morris <address@hidden>

    Prevent loading vc-bzr writing to ~/.bzr.log
    
    * lisp/vc/vc-bzr.el (vc-bzr-status-switches): Disable bzr logging.
---
 lisp/vc/vc-bzr.el | 4 +++-
 1 file changed, 3 insertions(+), 1 deletion(-)

diff --git a/lisp/vc/vc-bzr.el b/lisp/vc/vc-bzr.el
index 73d05c7..d0e9f77 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.