[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[elpa] externals/transient efdf919 5/5: transient--goto-button: Anchor h
From: |
Jonas Bernoulli |
Subject: |
[elpa] externals/transient efdf919 5/5: transient--goto-button: Anchor headings |
Date: |
Mon, 26 Jul 2021 16:11:45 -0400 (EDT) |
branch: externals/transient
commit efdf91980a6f8bcb151debb877302ead8751ab65
Author: Jonas Bernoulli <jonas@bernoul.li>
Commit: Jonas Bernoulli <jonas@bernoul.li>
transient--goto-button: Anchor headings
This assumes that `transient-force-single-column' is t.
See #4438.
---
lisp/transient.el | 2 +-
1 file changed, 1 insertion(+), 1 deletion(-)
diff --git a/lisp/transient.el b/lisp/transient.el
index 9af641e..4984977 100644
--- a/lisp/transient.el
+++ b/lisp/transient.el
@@ -3451,7 +3451,7 @@ See `forward-button' for information about N."
(defun transient--goto-button (command)
(cond
((stringp command)
- (when (search-forward command nil t)
+ (when (re-search-forward (concat "^" (regexp-quote command)) nil t)
(goto-char (match-beginning 0))))
(command
(while (and (ignore-errors (forward-button 1))