diff options
-rw-r--r-- | buildbot-client.el | 4 | ||||
-rw-r--r-- | buildbot-view.el | 8 |
2 files changed, 8 insertions, 4 deletions
diff --git a/buildbot-client.el b/buildbot-client.el index ae6ff44..0d4cf41 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 7f463f4..a69b923 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))) |