branch: externals/buildbot
commit b0b136970276c2988e5cd1c84911e966d68cce2f
Author: Yuchen Pei <[email protected]>
Commit: Yuchen Pei <[email protected]>
Make `buildbot-host' and `buildbot-builders' buffer local.
---
buildbot-client.el | 4 ++--
buildbot-view.el | 8 ++++++--
2 files changed, 8 insertions(+), 4 deletions(-)
diff --git a/buildbot-client.el b/buildbot-client.el
index ae6ff44896..0d4cf41e82 100644
--- a/buildbot-client.el
+++ b/buildbot-client.el
@@ -27,8 +27,8 @@
(require 'buildbot-utils)
(require 'cl-seq)
-(defvar buildbot-host nil "Buildbot instance host.")
-(defvar buildbot-builders nil
+(defvar-local buildbot-host nil "Buildbot instance host.")
+(defvar-local buildbot-builders nil
"Buildbot builders.
Can be generated with `(buildbot-get-all-builders)'.")
diff --git a/buildbot-view.el b/buildbot-view.el
index 7f463f448b..a69b9233e9 100644
--- a/buildbot-view.el
+++ b/buildbot-view.el
@@ -302,12 +302,16 @@ With a non-nil NO-BRANCH, do not show branch info."
"Open a view of TYPE using DATA.
With a non-nil FORCE, reload the view buffer if exists."
- (let ((buffer-name (buildbot-view-buffer-name type data)))
+ (let ((buffer-name (buildbot-view-buffer-name type data))
+ (host buildbot-host)
+ (builders buildbot-builders))
(when (or force (not (get-buffer buffer-name)))
(with-current-buffer (get-buffer-create buffer-name)
(buildbot-view-mode)
(setq buildbot-view-type type
- buildbot-view-data data)
+ buildbot-view-data data
+ buildbot-host host
+ buildbot-builders builders)
(buildbot-view-update)))
(switch-to-buffer buffer-name)))
