branch: externals/hyperbole commit 7eae5391efd76a058579bdb421288370ea9db888 Author: Bob Weiner <bob.wei...@duffandphelps.com> Commit: Bob Weiner <bob.wei...@duffandphelps.com>
(hui:ibut-label-create): Skip back past opening delimiter --- Changes | 5 +++++ hui.el | 5 ++++- 2 files changed, 9 insertions(+), 1 deletion(-) diff --git a/Changes b/Changes index 4c85148..d4d97a5 100644 --- a/Changes +++ b/Changes @@ -1,3 +1,8 @@ +2020-07-23 Bob Weiner <r...@gnu.org> + +* hui.el (hui:ibut-label-create): Fixed to skip back past opening delimiter + before adding new label. + 2020-07-22 Bob Weiner <r...@gnu.org> * hsys-org.el (org-mode): Added support for global Org link activation diff --git a/hui.el b/hui.el index ef8edfe..2d048ce 100644 --- a/hui.el +++ b/hui.el @@ -634,7 +634,10 @@ its buttons, the label is simply inserted at point." (ibut (save-excursion (when ibut-start - (goto-char ibut-start)) + (goto-char ibut-start) + ;; Skip over any non-whitespace or symbol chars to move + ;; back past any opening delimiter + (skip-syntax-backward "^-_")) (save-excursion ;; Check if ibut has an existing preceding label (skip-chars-backward "][:=<>a-zA-Z0-9#@!$%^&* -")