jenkins: refresh console output, brittlely

1 files changed, 11 insertions, 2 deletions

diff --git a/init.org b/init.org
index baa1953..fbb826b 100644
--- a/init.org
+++ b/init.org
@@ -2066,12 +2066,21 @@
         ;; optionally: jenkins-colwidth-id, jenkins-colwidth-last-status
         (setq jenkins-colwidth-name 35)
         :config
-        (defun jao-jenkins-first-job ()
+        (defun jao-jenkins-first-job (&rest _)
           (interactive)
           (goto-char (point-min))
           (when (re-search-forward "^- Job" nil t)
             (goto-char (match-beginning 0))))
         (add-hook 'jenkins-job-view-mode-hook #'jao-jenkins-first-job)
+        (advice-add 'jenkins-job-render :after #'jao-jenkins-first-job)
+
+        (defun jenkins-refresh-console-output ()
+          (interactive)
+          (let ((n (buffer-name)))
+            (when (string-match "\\*jenkins-console-\\([^-]+\\)-\\(.+\\)\\*$" n)
+              (jenkins-get-console-output (match-string 1 n) (match-string 2 n))
+              (goto-char (point-max)))))
+
         :bind (:map jenkins-job-view-mode-map
                     (("n" . next-line)
                      ("p" . previous-line)
@@ -2080,7 +2089,7 @@
                     :map jenkins-console-output-mode-map
                     (("n" . next-line)
                      ("p" . previous-line)
-                     ("g" . jenkins--refresh-console-output))))
+                     ("g" . jenkins-refresh-console-output))))
     #+END_SRC
 * Programming
 *** Automatic modes