emacs-elpa-diffs
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

[elpa] externals/buildbot 69a087571a 3/5: Adding imenu support


From: ELPA Syncer
Subject: [elpa] externals/buildbot 69a087571a 3/5: Adding imenu support
Date: Sat, 15 Jul 2023 03:57:38 -0400 (EDT)

branch: externals/buildbot
commit 69a087571aa807008ba2f792926a2bda29d524bb
Author: Yuchen Pei <id@ypei.org>
Commit: Yuchen Pei <id@ypei.org>

    Adding imenu support
---
 buildbot-view.el | 11 +++++++++--
 1 file changed, 9 insertions(+), 2 deletions(-)

diff --git a/buildbot-view.el b/buildbot-view.el
index a69b9233e9..323d3bc372 100644
--- a/buildbot-view.el
+++ b/buildbot-view.el
@@ -30,7 +30,8 @@
 (require 'buildbot-client)
 (require 'text-property-search)
 
-(defvar buildbot-view-header-regex "^\\[.*\\]$")
+(defvar buildbot-view-header-regex "^\\[.*\\]$"
+  "The header regex in a Buildbot buffer.")
 (defvar buildbot-view-branch-change-limit 10)
 (defvar buildbot-view-builder-build-limit 50)
 ;; 'revision, 'build, 'step, or 'log
@@ -51,7 +52,13 @@
   "Keymap for `buildbot-view-mode'.")
 
 (define-derived-mode buildbot-view-mode special-mode "Buildbot"
-  "A Buildbot client for Emacs.")
+  "A Buildbot client for Emacs."
+  (setq-local imenu-generic-expression
+                   (list (list nil
+                          (format "^\\(?:%s\\).*$"
+                                  buildbot-view-header-regex)
+                          0))
+              imenu-space-replacement nil))
 
 (defun buildbot-view-next-header (n)
   "Move forward N headers."



reply via email to

[Prev in Thread] Current Thread [Next in Thread]